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CONFIDENTIAL PROPRIETARY INFORMATION 

THIS ITEM IS THE PROPERTY OF DATAPOINT CORPORATION, SAN ANTONIO, TEXAS, AND CONTAINS CONFIDENTIAL AND 
TRADE SECRET INFORMATION. THIS ITEM MAY NOT BE TRANSFERRED FROM THE CUSTODY OR CONTROL OF DATAPOINT EXCEPT 
AS AUTHORIZED BY DATAPOINT AND THEN ONLY BY WAY OF LOAN FOR LIMITED PURPOSES. IT MUST NOT BE REPRODUCED 
IN WHOLE OR IN PART AND MUST BE RETURNED TO DATAPOINT UPON REQUEST AND IN ALL EVENTS UPON COMPLETION OF 
THE PURPOSE DF THE LOAN, 

NEITHER THIS ITEM NOR THE INFORMATION IT CONTAINS MAY BE USED OR DISCLOSED TO PERSONS NOT HAVING A NEED 
FOR SUCH USE OP DISCLOSURE CONSISTENT WITH THE PURPOSE OF THE LOAN, WITHOUT THE PRIOR WRITTEN CONSENT OF 
DATAPOINT, 
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COMMAND LINE WAS: SNAP3 COMM , , ,PROCfGBQLX 



INCLUSION a: procparm/txt 










INCLUSION R: PMACMIC/TXT 










INCLUSION C: GMACROZ/TXT 










INCLUSION 0: PORTASGN/TXT 










INCLUSION ES PROCEQUS/TXT 










INCLUSION Ft HOEF180PI/TXT 










INCLUSION G! BOEF1800/TXT 










INCLUSION Hj P0RTE9US/TXT 










INCLUSION II DOEF1800/TXT 










INCLUSION Ji HDEF1800/TXT 










program name: comm 










PROGRAM ADDRESS BLOCKS! 


010000 


/ABSOLUTE/ 


snE*000000 


CABS) 




1674PI0 


/SYSIVR/ 


size»000400 


CABS) 




170000 


/SYSRQM/ 


SIZE-000047 


CABS) 




006000 


/COOXL/ 


SIZE«00100« 


CABS) 




000000 


/CDOXP/ 


SIZE«0PI8»09I 


CREL) 




007000 


/CDORL/ 


SIZE«001000 


CABS) 




000000 


/COQRP/ 


8IZE»002000 


CREL) 



EXTERNAL DEFINITIONS! 

SIOUT 006555 SISTART 006660 

EXTERNAL REFERENCES (UNDEFINED SYMBOLS) I 

FETCHW SRVRPT FETCHI MEMPFS SRVNXT 

UNUSED LABELS! 

CVER CREV CPRE INSZ SDLCX 



SICIQ 006707 



SUN 



0SJ7674 



IVIOLS FETCH 



SIMOOOT SDLCR SHI 
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1. 

■ m 

«, 

•', 

10. 

»; 

12, 

13, 
14. 

17. 
18' 
19. 
20, 

2iJ 

** « 

24, 

25. 

2«; 



8ISYNC .GFNSYNC ,ANO ASYNC XMTR AND RCVR 



0010(30? 
000011 

800112 



, 3-MAR-78 * 


5:00 pm 


w 

CVEP 


EQU 


2 




CREV 


EOU 


9 




CPRE 

* 

. 2,9.K 


EOU 


•J' 




HJS 


17 APR 


78 


« Z , 9 • J 


MURF 


3 MAR 


78 


■ 2 * 9 • I 


HJS 


23 FEB 


78 


• 2(» 9 , H 


M i HS 


7/13 FEB 


78 


. 2,9.6 


HJS 


30 JAN 


78 


• 2, 9 • C 


HJS 


13 DEC 


77 


. 2.9.B 


HJS 


20 NOV 


77 




HJS 


19 SEPT 


77 


. 2,7 


MURF 


7 SEPT 


77 


. 2. 6. A 

* 

• 2 » 5 * C 


MURF 


29 AUG 


77 


MURF 


15 JULY 


77 


i 2,5,0 


HJS 


14 JULY 


77 


• 2. 5. A 

• 


HJS 


13 JULY 


77 


* 


INC 


PROCPARM 



COMMUNICATIONS VERSION NUMBER 
COMPATIBLE RELEASE NUMBER 
PRE-RELEASE CHANGE LETTER 

SET UP FOR RELOCATABILITY CNO CODE CHANGES) 

DELETE 'BREAK' MODE 

CLEAN MEMORY FAULT ACTIONS 

ADD 'BREAK' MOPE TO ASYNC XMIT CMEMPP SACK) 

CHANGE INTERRUPT ROUTINE MEMPF TO NO-OPS 

NO CHANGE 

JUST TO KEEP IN LINE WITH OTHERS 

JUST TO STAY IN LINE WITH NEWER VFRSION 

CLR USER FLAG AFTER MWAIT 

FIX LA;SDLC 8 BITS ONLYfSDLC GLOBAL AODR 

FIX SIACUIN & SIMODIN FOR NEW BOARDS 

FIX COPYING MISTAKE 

GENERATE STANDARD VRP FORMAT UPDATING 

CORRECT REGISTER EQU'S TO WORK FROM PROC/EPT 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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39l 
30, 






3)1 




32. 


I570fca 


33l 


|574£§ 



34, 



MICRO-PROCESSOR COMUNICATIONS SUPPORT - JAM - 
INTERFACE STUFF 



78JUL20 J1I44 



XBUF 
RflUF 



BUFFER AREAS 

EQU 
EOU 



SVSCOM 
SVSCQM+256 



DATAPOJMT CONFIDENTIAL INFORMATION - SEE PAGE i 
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37'. 

3$;. 

39^ 
48, 

< 

42. 

44. 
45' 

46. 
47* 

A K 
A9 t 

50, 

5! 

52. 

53, 
54, 
55, 
56. 
57'. 
58' 
59, 
60, 
61, 
62, 
63, 

64 f 
65, 

66, 

67: 

68* 
69. 
70, 

7 h 

73, 

74 r 

76, 
73 r 

79! 

80, 
81, 
82, 
83, 
84. 
85' 
86, 
87, 
88. 



030001 
030007 



030016 



030016 
030017 
030006 

030007 



COMMODE KOU F5+F6*0tl 

COMMODE FORMAT 

BI9YNC 00 0^3 001 

GENSYNC LL L0S 010 

ASYNCCi) LL L00 100 

ASYNCH.5) LL L00 1&1 

ASYNCC2) LL L«0 110 

SOLC 00 00A Kit 



COM CONTROL 



SsSYNDEL. 1 TO STRIP OFF RECEIVED SYN CHARACTERS 
L«WLNGTH« 8-N WHERE N IS NUMBER OF BITS PER CHARACTER 
U)»C1,5),C2)«> NUMBER OF STOP ELEMENTS 
AaADDOET, 1 TO RECEIVE ONLY IF ADDRESS. FIELP«5NIO 



BISVNC REGISTERS 



XSTAT 
XPNTR 
XDATA 
XCRCH 
XCRCL 

RSTAT 
RPNTR 
RDATA 
RCRCH 

RCRCL 

LINK 

TEMPI 
TEMP2 
Q 



equ 

EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 
EQU 

EQU 
EQU 
EQU 
EQU 



BSTAT EQU 
R0ATA2 EQU 



F5+F6+013 
F5«-F6*014 
F5+P6+015 
F5+F6+018 
F5+F6+017 

F5+F6t003 
F5+F6+004 
F5*F6+005 
F5+F8+006 
F5*F6*007 

F5+F6+000 
F5+F6*001 
F5+F6+002 
F5+002 

TEMPI 
RCRCL 



XMIT STATUS 

XMIT BUFFER POINTER 

(SYNCODE IN GENSYNC, AIS70R IN ASYNC) 
fXlCOUNT IN ASYNC) 

RCV STATUS 

RCV BUFFER POINTER 

CRICOUNT IN ASYNC) 
fSPCOUNT IN ASYNC) 



TEMPMI 
TEMPJM 
TEMPMI 
DEFAULT 



(DON'T WRITE! i 15 



RVC BUFFER STATUS 

FOR SYN DETECTION IN BISYNC AND GENSYNC 



GENSYNC REGISTERS 



SYNCODE EQU XCRCH 



ASYNC REGISTERS 



AISTOR EQU 

XICOUNT EQU 

RICOUNT EQU 

SPCOUNT EQU 



SYNCODE 
XCRCL 
RCRCH 
RCRCL 



NUMBER OF INTERUPTS PER BIT 
XMT INTERUPT COUNTER 
RCV INTERUPT COUNTER 
RCV SPACE COUNTER 



USER BUFFER POINTERS CFOR EXXMIT AND EXRCV) 



OATAPOIMT CONFIDENTIAL INFORMATION m SEE PAGE 1 
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89 . 
90l 

93. 



.UXPNTR EQU 
.URPNTR CGU 



F5tF6*010 
F5+F6+012 
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E 7 


COHM/1 


FXT 


96l 






97. 






us; 


000010 




"r 


051918110 




100 
101* 


080340 








l«2. 






1031 






104; 


000001 




1051 


000001 




i«« f 


000002 




107, 
1*8, 


0100002 




000004 




109, 


000010 




110. 


000010 




HI, 


000020 




112, 


000020 




us; 


000040 




114 






us, 






us; 






117. 






us; 


000001 




119, 






120. 






121; 






122; 

123; 


000004 




000004 




124. 






12S; 


000010 




126, 






127: 






128, 






129, 






130. 
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COMMODE 




SYNOEL 


EQU 


010 


ADOOET 


EQU 


SYNOEL 


WLNGTH 


EQU 


0340 


\ XSTAT 




• 
EOB 


EQU 


80 


CIP 


EQU 


EOB 


LOLE 


EQU 


Bl 


SIP 


EQU 


LOLE 


FILIP 


EQU 


82 


XPAR 


EQU 


83 


CRC 


EQU 


XPAR 


BIP 


EQU 


B4 


FTP 


EQU 


BIP 


BCGUNT 


EQU 


83 


\ RSTAT 




»EQB 


EQU 


B0 


LA 


EQU 


B0 


,CIP 


EQU 


EOB 


.LOLE 


EQU 


Bl 


.SIP 


EQU 


LDLE 


SYNWAIT 


EQU 


B2 


IDLE 


EQU 


SYNWAIT 


,CRC 


EQU 


XPAR 


CHRCOM 


EQU 


XPAR 


.SIP 


EQU 


B4 


.PIP 


EQU 


BIP 


,BCOUNT 


EQU 


85 



8I8YNC AND GENSYNC ONLY 

SDLC ONLY 

WORD LFNGTHf GENSYNC AND ASYNC ONLY 



END OF BLOCK (BISYNC) 

CHARACTER IN PROCESS (ASYNC) 

LEADING OLE CBISYNC) 

START ELEMENT IN PROGRESS (ASYNC) 

FILL IN PROGRESS IF NOT EOB, ELSE CRC2 SENT(BISYNC) 

TRANSPARENT (BISYNC) 

CRC BEING SENT (SOLO 

BLOCK IN PROGRESS (BISYNC) 

FRAME IN PROGRESS (SDLC) 

BIT COUNT (3 BITS) 



END OF BLOCK (BISYNC) 
LINE ACTIVE (SDLC) 

CHARACTFR IN PROGRESS (ASYNC) 

LEADING OLE (BISYNC) 

START ELEMENT IN PROGRESS (ASYNC) 
WAITING FOR SYN SYN (BISYNC * GENSYNC) 
WAITING FOR FLAG (SDLC) 

CRC IF EOB, XPAR IF NOT (BISYNC) 
CHARACTER COMPLETE (ASYNC) 

BLOCK IN PROGRESS 

FRAME IN PROGRESS (SDLC) 

BIT COUNT (3 BITS) 



DATAPQINT CONFIDENTIAL INFORMATION «■ SEE PARE 1 
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133'. 



COMM/TXT 



134 

135 

136 

137 

138! 

139! 

140 

141 



142: 


143. 


144' 


145^ 


146. 


147, 


148 
149; 


1501 


151, 


152. 


153; 


154; 


155, 



000062 
000001 

000002 

000003 

000046 
000037 
000055 
000020 



000176 
000177 
000377 

000174 

000020 
000010 

000205 
000H7 



MICRO-PROCESSOR COMUNICATIQNS SUPPORT * JAM m 
CHARACTERS OF INTEREST 



EBCOIC CONTROL CHARACTERS 
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SYN 


EQU 


362 


SOH 


EOU 


001 


STX 


EQU 


002 


ETX 


EOU 


003 


ETB 


EOU 


046 


ITB 


EQU 


037 


ENQ 


EOU 


055 


OLE 


EQU 


020 



INTERESTING SOLC CHARACTERS AND STUFF 



FLAG 


EOU 


0176 


ABORT 


EOU 


0177 


GLOBAL 


EQU 


0377 


JN3Z 


EOU 


0174 


POLVHI 


EOU 


020 


POLYLO 


EQU 


010 


GOCRCH 


EQU 


0205 


6DCRCL 


EQU 


0117 



29AUG77 

29AUG77 
INSERTED ZERO (LSB»X) 
HI BYTE OF CRC POL* 
LQ " » " 
HI BYTE OF GOOO CRC (INCLUDING 
LO " " " " 



SIX 
II 



BITS 



OF 
11 



FLAG) 



156. 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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159. 
160. 

161, 

i«, 
163, 

1641 

l«, 
167. 

168* 

1691 

1701 
171. 
1721 
173, 
174, 
1751 
176; 



0016910?! 
0000091 
006000 
000000 
006000U 



006000L 
0«6001L 
0&6008L 
006003L 
006004L 
006005L 
006W06L 



011100101 

01000101 
11010010 
01000101 
11000011 
0100PI101 
110109(1! 



COOXL 


ORG 


coox 


CDOXP 


ORG 





COOXL 


USE 


CDOXL 




USE 


COOXP 


cpoxp 


LOC 


C00XU2 



LOGICAL SPACE DEFINED IN PLACE 

PHYSICAL SPACE RELOCATABLE 

USE THEM BOTH 

PUT THE CODE IN THE PHYSICAL SPACE 

WITH ADDRESSES IN LOGICAL SPACE 



11111001 
00000100 
11001101 
00000010 
10010111 

00000001 

11011001 



* 

, SOOT COMES HERE TO SEE IF BISYNC, GENSYNC, ASYNC, OR SDLC 

TSTIR ,4,CQMM0QE 



BRA 
T3TIT 

I" A 

TSTIT 

BRA 



ASX,FZ 
,P 

BSCX,TZ 

,1 

GSX,TZ 



IT'S ASYNC (XX XXX IXXJ 

IT'S BISYNC (XX XXX 00X5 

IT'S GENSYNC (XX XXX 010} 
ELSE IT'S SDLC (XX XXX *11) 



OATAPOIWT CONFinENTlAL INFORMATION m SEE PAGE 1 
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is?; 

181, 
1821 

183, 

I84 f 

185 

186 

187, 

188. 

189" 

198>1 

191. 

198', 
193. 

1941 

195. 

196 

197. 

1981 

199. 

200, 

201, 

202. 

2031 

204. 

205*. 

206'. 



207, 

2081 

209*. 
2101 
21 l' f 

m I ■ m m 

213. 

214; 

215, 
2161 



2171 

2181 

2191 

2201 

22 ll 



006007L 
006010L 
0&60HL 
0f6012L 

006813U 
006014L 
006015L 
006»16L 
006017L 
0060201 
008021L 
006022L 
0060231. 
006024L 
006025L 
0060261 
006027L 
0W6030L 
006031L 
0060321 
006033L 
006034L 
006035L 
006036L 
006037L 
006040L 

006041L 
006042L 
006043L 
006044L 
006045L 
006046L 

006047L 
006050U 
0060511 
006052L 

006053L 
006054L 



01110001 

01000101 

11000011 
01110001 
01010101 
01110010 
011100001 
11000010 
01010101 
01101111 
01010101 
01000000 
110000111 
01110001 
00010111 

00010111 

01101111 
01110001 
01010010 
01101111 
11000000 
01110001 
01000101 
11000010 
01010001 
11001111 

11000011 
01000101 
11000B10 
01110001 
01010011 
01101111 

01110001 
01000101 
11000011 
01110001 
01010101 
01110000 



10111011 
00011000 
11101011 
11111101 
00000001 
11111011 

11001011 
11101111 
11111000 
11111011 
00000111 

00000101 
11000000 

11111101 

10110010 
10010010 
11111101 
10111011 
00100000 
11111011 
11011000 
11U10U 
00001000 
10101010 

11011110 
01001010 

10111001 
00000010 
10110110 

n i i i i i 

00010000 
11111011 

11111011 

00010000 

11000011 
11111101 
00000001 
11111110 



XSTAT USAGE 



0,1,2 — ONE'S COUNT (FOR ZERO INSERTION) 

3 <— CRC (BEING SENT) 

4 — » FIP (FRAME IN PROGRESS) 
5,6,7 — - BCOUNT (BITS PER CHARACTER) 



XBUF STAT 



INCBIT 



SOLCX1 



*•-- ROY (PREVIOUS BUFFER BYTE IS DATA TO XMIT3 

1 --* SPX (SPECIAL: END FRAME WITH CRC/FLAG OR ABORT) 
2,3,4,5,6,7 w-n fl 



SOUCX TSTIR ,FIP+CRC, XSTAT, CC 



BRA 
OOTIR 

DOTR 

TSTRT 

BRA 

DOTI 

LDRT 

DOTI 

TSTIT 

BRA 

LDTR 

CCLR 

SHIFT 

LDRT 

OORIR 



BRA 
TSTIR 

BRA 

LOTA 

BRA 

BRA 
TSTIT 
BRA 
OORIR 



BRA 
SXCRCl OOTIR 

DOTR 



INCBIT, TZ 
,ND,l,XOATA 

,AC#XSTAT 
XR, XSTAT 
S*2»FZ 

, NO, 0370 

XSTAT 

,NO,7 

XR,5 

STUFF0,TZ 

XOATA 



SEE IF WE ARE DOING ZERO INSERTION 

NOT IF NO FRAME OR CRC IN PROGRESS 
GET LAST BIT SENT 

ADO LAST BIT TO ONES CQUNTf LS8 -> LINK 
IF IT WAS A ZERO WE DIDNT CHANGE ANYTHING 

AND WE THEREFORE CLEAR THE COUNTER 

GET ONES COUNT 
FIVE ONES? 

THEN STUFF IT 
DO A CIRCULAR SHIFT 



SR 

XOATA 

XSTAT, AC, BCOUNT, XSTAT, CC BUMP THE BIT COUNTER 



DOSXCRCFC 
, CRC, XSTAT 

XSDLCRCFZ 
SOtCXl 

CHKBUF 

MTBUF,TZ 

,2 

SPX,FZ 

XSTAT, OR, FIP, XSTAT 



DOSXCRC TSTIR ,FIP,XSTAT 



SOXBIT,TZ 
,ND,1,XDATA 

,XR,XCRCH 



JUST 00 THE CRC IF NOT END OF BYTE 
SENDING CRC? 



SET RETURN ADDRESS 
CHECK FOR MORE DATA 



CHECK BUFF STAT FOR CONTROL 

AND GO HANDLE SPECAIL XMIT IF SO 
SET FRAME IN PROGRESS * 29AUG77 



FRAME IN PROGRESS? 

JUST SEND A BIT IF NOT 
GET LSB 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE t 
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223, 
224. 

225. 
228*. 
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227. 



228 ■ 
229, 

230, 

23li 
232j 

233 a 

234, 
235, 

236, 
237j 
238. 
239*. 



240. 



241, 
2421 

243. 

2441 

245. 

246'. 
247. 

248*. 

249. 

250*. 



25il 

252, 
253, 
254, 

255. 

256'. 

2571 

258. 



0060551 

006056L 
0A6057L 
0(360601. 
008061L 
006062L 
006063L 
006064L 
006065L 
008066L 
006067L 
006070L 
006071L 
006072L 
006073L 

006074L 
006075L 
006P76L 

006077L 
006100L 
006101L 
006102L 
006103L 
0061041 
006105L 

006106L 
006107|. 

006110L 
006111L 
006112L 
006U3L 
006114L 

006U5L 
006H6L 
006117L 
006120L 
006121L 
006122L 
006123L 
006124U 

006125L 
006126L 
006127L 
006130L 
006131L 
006132L 
006133L 
006134U 



01101111 
00010111 
01000101 
11000011 
01010000 
01101111 
01110001 

01010000 

01101111 
0U10001 

00010111 

01101111 

01110001 
00010111 
01101111 

01110001 
00110111 
11011111 

01110001 
01010101 
01101111 
01110001 
01010101 
01101111 

11001111 

01110001 

01000101 
11000010 
01110001 
01000000 
11000010 
01110001 
0100010} 
11000011 
01010011 
01101U1 

01110001 
01010000 
01101111 
11001111 

01000101 
11000011 
01010101 
01101111 
01110001 
01010000 
01101111 
11001111 



11U1110 
10110010 

00000001 
11001001 
00010000 
11111110 
11111111 
00001000 
11111111 
11111111 
10010010 

niiiiu 
11UH10 

10010010 
11111110 

11111101 
00100011 
00000011 

1111U01 
U111U0 
11111101 
11111011 
11U1000 

11111011 

11000010 

11111011 
00010000 
10011011 

ini ii0i 

01111110 
10011011 
11111011 
00010000 
10100000 
00001000 
11111011 
11111110 

litiiiii 

11111101 

11010101 

00010000 
10100010 
11101111 
11111011 
11111110 
10000111 
11111101 

11000010 



UORT 


XCRCH 


CCUR 




TSTIT 


»1 


BRA 


XFB0,TZ 


DORI 


XCRCH, XR,POLYHI 



PUT THE FEEDBACK IN THE LINK 
FEEDBACK ONE OR ZERO? 



DORIR XCRCL, XR,POLYLO. XCRCL 



XFB0 



LOTR 

SHIFT 

LDRT 

LOTR 

SHIFT 

LDRT 



SOXBIT LOTR 
SDXBIT1 LDPT 
BRA 



XCRCL 

SR 

XCRCL 

XCRCH 

SR 

XCRCH 

XOATA 

SDLCOT 

CRETURN 



FEEDBACK IS STILL IN LINK 



GET THE DATA 
SEND THE LSB 



STUFF0 DORIR XDATA , NO, 0376, XOATA MAKE ME THINK I SENT A ZERO 



DflRIR XSTAT,NO,0370,XSTAT CLEAR THE ONES COUNTER 



BRA SDXBIT1 

MTBUF TSTIR ,FIP,XSTAT 

BRA XABORT,FZ 

SPX TSTIR XR,FLAG,XDATA 

BRA XABORT.FZ 

TSTIR # FIP f XSTAT 

BRA INTXCRCTZ 

DORI XSTAT,OR,CRC 

DORIR XDATA,XR, 0377, XCRCH 



BRA 

XSDLCRC TSTIT 
BRA 
DORI 



SXCRCi 

,FIP 

XEOF,TZ 

XSTAT,ND,M-FIP 



DOTIR ,XR, 0207, XCRCH 



AND SEND A ZERO 

FRAME IN PROGRESS? 

SDLC UNDERRUNS ARE A NO»NOJ 
WAS LAST BYTE A FLAG? 

SEND MARKS IF NOT 
FRAME IN PROGRESS? 

YES, END IT WITH CRC 
INVERT THE CRC BEFORE SENDING IT 



SEND SECOND BYTE OF CRC? 
YES 
NO, CLEAR FRAME IN PROGRESS 

THIS GETS INVERTED CRCL 



SDXDATA LDRT 
BRA 



XDATA 
SDXBIT1 



OATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE 1 
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259. 
260. 

26ll 
282. 

263'. 
264. 



f 



26S 

266, 

2671 



2681 
269, 
270. 



006135L 010100^1 01111110 XEOF 

006136L 01101111 11111101 

006137L 01010001 lliltiil INTXCR( 

00614WL 0110111! 11U1110 

006141L 01101111 1U111U 

0&6142L 01101110 01111011 

006143L 11001111 11000011 

006144L 01010001 00000000 XABORT 

00614SL 01101111 U1H0U 

006146L 01010001 11111111 

006147L 11001111 10100100 



LORI 


XDATA,FLAG 


LORI 


XCRCH,0377 


LORT 
INCR 
BRA 


XCRCL 
XSTAT 
SOXBIT 


LORI 


XSTAT, 


LOTI 
BRA 


0377 
SOXOATA 



FOLLOW CRC WITH FLAG 



ZERO XSTAT 



SEND MARKS 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE i 
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273. 

2741 

275, 

276, 

277, 

278, 

279, 

280 

281, 

282, 

283, 

284, 

285, 

286, 

287. 



288; 
289' 
290, 
291, 
292, 
293. 

2941 
295, 
296, 
297, 
2981 
299. 

3W0*. 
30ll 

3021 
303, 
3041 
305, 
305, 
307; 
308, 
309, 
3101 
311. 



3121 

313' 
314. 



315*. 



806150L 
006151L 
006152L 
0961531. 
006154C 
006155L 
006156L 
008157U 

006160L 
006161L 
006162L 
006163L 
008164L 
006165L 
006166L 
006167L 
006170L 
006171L 
006172L 

006173L 
006174L 

0061751, 
006176L 
006177L 
006200L 
006201L 
006202L 
006203L 
006204L 
006205U 
0062061. 
0B6207L 
006210L 
006211L 
006212L 
006213L 
006214U 
006215L 



01110001 
01010010 

01101111 
11800000 
01000101 
110000110 
010510101 
11000010 
01110001 
01000000 

11010011 
01110001 
01010101 
01000000 
11000011 
01110001 
01000000 
11000011 
01000000 
11000011 

01000000 
11000011 
01000000 
11000011 
01000000 
11000011 
01800000 
11010011 
01110001 
01010101 
01101111 
01110001 
01000000 
11000011 
01110001 
01 110000 
01101111 
01110010 



10111011 

00100000 
11111011 

00100101 
00000001 

00011111 
00000100 
00010010 
11111101 

00010000 

11110010 
11111011 

00001010 
00001000 
01U0101 

11UU01 

00000011 
00001111 
00100110 
00001111 
00011111 
00001100 
00101101 
00000101 

00080010 
00000001 
00000001 

11UU00 
11111011 
11111101 
11111011 
11111101 

08110010 
01001011 
11111101 
11111111 
UU0001 

08110001 



XSTAT USAGE 



XBUF STATUS 



BSCX 



XNCNTL 



9) »■«• 

I *•■>«* 

4 --» 

5,6,7 — 




1 



2,3,4,5,6,7 -•• 
OORIR XSTAT, AC, 8CQUNT, XSTAT, CC 



EOB (END OF BLOCK) 

LOLE (LEADING OLE) 

FILIP (PILL IN PROGRESS IF MOT EOB, ELSE CRC2 SENT) 

XPAR (TRANSPARENT MODE) 

SIP (BLOCK IN PROGRESS) 

BCOUNT (BITS PER CHARACTER) 



ROY (PRECEDING BYTE IS DATA TO XMIT) 
COM2 (LIKE COM2 IN MFCA) 



BRA 

TSTIT 

BRA 

TSTIT 

BRA 

TSTIR 

BRA 

LDTR 

DOTI 

TSTIT 

BRA 

TSTIR 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 

TSTIT 

BRA 

OORIR 



XBIT,FC 

, EOB 

XCRC2,FZ 

, FILIP 

XFILLX,FZ 

XR,OLE,XOATA 

XOLE,TZ 

XSTAT 

,ND,XPAR*LOLE,TW 

XR,XPAR 

DC1XCRCTZ 

XR,ETX,XDATA 



INC THE BIT COUNT 



JUST SEND A BIT IF 



NOT 8 BITS 



TIME TO SEND 


SECOND CR 


DO IT IF SO 




XPAR FILL IN 


PROGRESS? 


SEND SYN IF 


SO 


SENT OLE? 





NO, GET XSTAT AGAIN 
MASK OFF ALL BUT XPAR, LOLE 
XPAR, LOLE' ? 

JUST SEND THE BYTE IF SO 
SENT ETX? 



XEOB,TZ 

XR,ETB 

XEOB,TZ 

XR,ITB 

XEOB 1 , TZ 

XR,ENO 

XENQ,TZ 

XR,STX 

XSTX,TZ 

XR,SOH 

XSOH,TZ 

XSTAT, NO, M-LDLE, XSTAT RESET LOLE 



TSTIR XR,SYN,XDATA 

BRA XBUMP,TZ 
DOXCRC DORRR TEMPI , XR, XCRCL, XDATA DATA,XR.CRCL*>TEMPl 



DOTR , AC, TEMPI, ,C0 



SL (LSB«0) 



0ATAPOINT CONFIDENTIAL INFORMATION » SEE PAGE 1 
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316*. 

3t y\ 

318* 
319. 

320. 

32tl 
322, 
322, 
322 . 
322, 
323. 



324. 
325. 



326 
327! 

328] 

329 

330 

331 

332 

333, 



334 

333, 

336, 

3361 

336, 

336, 

336, 

337, 

33$. 

339. 
340; 

341* 
342, 
343, 

344. 

3451 
346, 
347* 
3481 
349, 
350. 

351*. 



COMM/TXT 
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006216L 
006217L 
006220L 
006221L 
006222L 
006223L 
006224L 
008225L 

006228L 
006227L 
006230L 
006231L 
006232L 
006233L 
006234L 
006235L 
006238L 
0062371 

00624«L 
006241L 
006242U 

006243L 
006244U 
006245L 
006248L 
008247L 
006250L 

006251U 
006252L 
006253L 
006254L 
006255L 

006256L 
0062571, 

00S260L 

006261L 
006262U 
006263L 



011100100 
01101111 
00010111 
01101111 
00010111 
00010111 
01110000 
01101111 

00010111 
00010111 
00010111 
00010111 
01110000 

01101111 
01010101 
01110000 
01101111 

01110001 
00010111 
0001H111 
00010111 
00010111 
01101111 
01010101 
01110000 
01101111 
01110001 

00010111 
00010111 
091010111 

00010111 

00010111 
01010101 
01110000 
01101111 

01110001 
01000101 
110000)10 



1011010011 
11110001 
11010010 
11110010 
11«10010 
11010010 
11110010 
HU0010 

11010010 
J1010010 

11010010 

11010010 
11110010 
11110010 
00000001 
11111110 

iltllltl 

11119001 
10110010 
10010010 

10110010 
10010010 
1 

1 
1 
1 

1 



1110001 
1000000 
1111111 
1111111 
1110010 



10100010 
10100010 
10100010 
10100010 
10100010 
11000000 

11110001 

11111110 

11U1011 
00000001 
00001000 



006264L 01010001 010101010 



DORR 


TEMPI, XR, TEMPI 


DORR 


TEMP2,FT,Q,,CP 


SHIFT 


SR,CF 


SHIFT 


SR,CP 


DORR 


TEMP2,XR,T£MP2 


RPT 


4 


SHIFT 


SR,CF 


SHIFT 


SR.CF 


SHIFT 


SR,CF 


SHIFT 


SR,CF 


DORR 


TEMP2,XR,TEMP2 


OOTI 


,ND,1 


DORR 


XCRCL,XR,XCRCH 


LOTR 


TEMPI 


CCLR 




SHIFT 


SR 


CCLR 




SHIFT 


SR 


LDRT 


TEMPI 


DOTI 


, NO, 0300 


DORR 


XCRCL#XR,XCRCL 


LDTR 


TEMP2 


RPT 


5 


SHIFT 


SL 


SHIFT 


SL 


SHIFT 


SL 


SHIFT 


SL 


SHIFT 


S$ In 


DOTI 


, NO, 0300 


DORR 


XCRCH,XR,TEMPl 



TSTIR ,E08,XSTAT 
BRA XCRCFZ 

XBUMP LOTA X8UMP1 



TEMPI, XR.T-oTEMPl (LINK»01 

SR»>TEMP2 

SR 
SR 
TEMP2.XR.T->TEMP2 



SR BY 4 
SR BY 4 
SR BY 4 
SR BY 4 
TEMP2.XR,T->TEMP2 



CRCH.XR.T->CRCL 

LSB»>LIMK 

SRC 

LS8->LINK 

SRC 

T»»TEMPi 

CRCL,XR.T-.>CRCL 

TEMP2«>T 

SL BY 5 
SL BY 5 
SL BY 5 
SL BY 5 
SL BY 5 

TEMPI. XR.T*>CRCH 

TIME TO SEND FIRST CRC? 
CHECK BUFFER IF NOT 



, CHKBUF IS SHARED BY BISYNC, 6ENSYNC, ASYNC, AND SDLC 

RETURNS T2 IF XMIT BUFFER IS MT, ELSE RETURNS WITH NEW DATA IN XDATA 
, AND BUFFER STATUS IN T 



00I6265L 
006266L 
006267L 
006270L 



01101111 
11000100 

11010111 

00110001 



J 1110000 
01001001 
00000111 
110>11100 



CHKBUF LDRT LINK 

MWAIT ,CMEMPK 



PUT RETURN ADDRESS IN LINK 
DOPIP MODW,ND»-l*SWUSER,PSWI MAKE SURE WE CAN USE THE MEMQRYl 



DATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE 1 
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COMM/TXT 




MICRO-PROCESSOR 


COMUNICATIONS 










BISYNC XMTR 






0<*627!L 


01010101 


11111011 








006272L 


00110111 


00000100 






352'. 


006273L 


01010001 


liaiiiia 


LOPI 


MAR0H,XBUF>8 




006274L 


00110111 


11100000 






353*. 


006275L 


01110001 


1111U00 


OOPIR 


MAROLiOR,l,XPN 




006276L 


01010011 


00000001 








0&6277L 


00110111 


11000000 






3541 


006300L 


00110111 


01000111 


STB 


SMR 


3551 


006301L 


01101111 


11111100 


LORT 


XPNTR 


3561 


006302L 


11000100 


00111101 


MWAIT 


,CMEMPK 




0063031 


11010111 


000001U 






3571 


006304L 


00110001 


00110110 


LORP 


TEMPI, MDR 




0S6305U 


01101111 


11110001 






358* 


006308L 


11100011 


00000000 


BRR 


LINK,TZ 


359'. 


006307L 


01010001 


00000000 


LOPI 


MOW,0 




006310L 


00110111 


00100001 






3601 


0063HL 


01110001 


11111100 


LOTR 


XPNTR 


36ll 


006312L 


11000100 


00110101 


MWAIT 


,CMEMPK 




006313L 


11010111 


00000111 






3621 


0063HL 


0011011) 


0000U01 


STB 


OMAR 


363, 


006315L 


00110111 


01000111 


STB 


SMR 


364, 


006316L 


01101110 


01111100 


INCR 


XPNTR 


3651 


0063J7L 


11000100 


00110000 


MWAIT 


, CMEMPF 




0W6320L 


11010111 


00000101 






3661 


0&6321L 


00110001 


00110110 


LORP 


XDATA,MOR 




0063221 


01101111 


11111101 






3671 


006323L 


0U10001 


11110001 


LOTR 


TEMPI 


3681 
369, 
3701 


006324L 


11101111 


00000000 


BRR 


LINK 


006325U 


11010011 


11100100 


XBUMP1 BRA 


XFILL»TZ 


371; 


006326U 


01000101 


00000010 


TSTIT 


»s 


372; 


006327U 


11000011 


00100101 


BRA 


XBIT,TZ 


373. 


006330U 


01 110001 


11111100 


INCR 


XPNTR, XPNTR 




00633JL 


01101110 


01111100 






3741 


006332L 


01110001 


11U1101 


XBIT UOPR 


SOLCOT,XOATA 




006333L 


00110111 


00100011 






3751 


006334L 


00010111 


10110010 


CCLR 




376, 


006335U 


00010111 


10010010 


SHIFT 


SR 


3771 


006336L 


01101111 


11111101 


LORT 


XOATA 


378. 
3791 

3801 


0063371 


H0U111 


00000011 


BRA 


CRETURN 


006340L 


01000101 


00000100 


XCRC2 TSTIT 


,FILIP 


3811 


006341U 


11000010 


001*11000 


BRA 


XCRCXIT, FZ 


3821 


006342L 


01010011 


00000100 


OORI 


XSTAT,OR,FILIP 




006343L 


01101111 


11111011 






3831 


006344L 


01110001 


11111110 


LORR 


XOATA,XCRCH 




006345L 


01101111 


11111101 






3841 

385. 
3861 


006346L 


11001111 


00100101 


BRA 


XBIT 


006347U 


01010101 


00010000 


XCRCXIT DORI 


XSTAT*NO,BIP 




006350L 


0U0U11 


11111011 






387'. 


006351L 


01010001 


00000000 


L^RI 


XCRCL,® 



78JUL20 11J44 



POINT TO CURRENT STATUS 



AND REAO IT 
MAKE SURE XPNTR POINTS TO STATUS 



SAVE CURRENT STATUS IN TEMPI 

RETURN IF BUFFER MT (STATUS*®} 
MAKE OLD BUF LOC ROY 

GET THE BUFFER POINTER 



POINT TO DATA 

AND READ IT 
BUMP THE POINTER TO NEXT DATA 



PUT NEW DATA IN XOATA 

GET THE STATUS 
AND RETURN 

FILL IF BUFFER MT (STATUS«01 
CHECK FOR "COM2" BIT 
LEAVE XPNTR AT NEXT DATA IF NORMAL 
BUMP IT TO NEXT STATUS IF "COM2« 

OUTPUT THE LSB 

MAKE THE SHIFT CIRCULAR 
SRC 
AND STORE IT AWAY AGAIN 



HAVE WE SENT THE SECOND CRC? 
CLEAN UP AND GO ON IF SO 
ELSE SEND IT 

CRCH*>OATA 



RESET ALL BUT BIP 
CLR CRC 



DATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE 1 
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388, 
389, 

391. 

W S £» # 

393. 
394. 



COHM/TXT 
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395'. 



39S1 
397, 
398. 

399; 

4*0, 
401*. 



402' 
403, 
404. 

483' 
406. 



4PI7; 



408 

409, 

410. 



411. 



412, 
413. 
414' 
415. 



416' 
417. 

418*. 
419*. 
420, 
421. 
422*. 



006352L 
0063531 
006354L 

006355L 
006356L 
006357L 

006360L 
006361L 
008362L 
006363L 
008364U 
0PI6365U 

00636fiL 

006367L 
006370L 
006371L 



01101111 
0U01111 
11001111 

01010101 
01101111 
11011111 

01110001 
01010101 
0U01H1 

01110001 
01010011 
01101111 

1100H11 

01110001 
01101111 

11001111 



006372L 01110001 
006373U 01010101 
006374L 01 101111 
006375L 11001111 



006376U 
006377L 
006400U 
006401U 
006402L 
006403L 
006404L 
006405L 
P06406L 
006407L 
006410L, 
006411L 
006412U 
0064131 
0M6414L 

006415L 
006410L, 
006417U 
006420L 
006421L 
006422L 

006423L 
006424L 
006425L 
006426L 



01110001 

01000101 

11010011 
01010011 
01101111 
01110001 
01000101 
11000010 
01010011 
01010101 
01101111 
01010001 
01101111 

01101111 
11001111 

011 10001 
01000101 
11010010 
01010011 
01101U1 
1100UH 

01000101 
11000010 
01010011 
1 1 It 1 1 



11111111 
U111110 
01001011 

HU1001 
11111011 
11011100 

11111011 
11101111 
11111011 
11111011 

00000001 
11111011 
01110101 

11111111 
11111101 

00100101 

11111011 

11100101 

11111011 

010010U 

11U10U 

00000010 

11111100 
00001000 
11111011 
11111011 
00010000 
01111011 
00010000 
11111101 
11111011 
00000000 

11111111 

11111110 
01001011 

11111011 
00001000 
11101100 
00000010 
11111011 
01110101 

00000010 
01111011 
00000010 
11111011 



LORT 
BRA 

XFILLX OORI 

BRA 

OORIR 



XEOB 



XCRC 



XENQ 



XSTX 



XSOH 



XDLE 



XXDLE 



XCRCH 
XBUMP 

XSTAT,N0,-1-FILIP-LDIE RESET FILIP.LOLE 

XSYN 

XSTAT,ND,-1-BIP,XSTAT RESET BIP 



XEOB1 DORIR XSTAT,OR,EOB,XSTAT 



SET EOB 



BRA 

LORR 

BRA 

OORIR 

BRA 

TSTIR 

BRA 
OORI 



BRA 

OOTI 

OORI 

LORI 

LORT 
BRA 



INCLUDE THE ENO CHAR IN THE CRC 
CRCL->DATA 



OOXCRC 

XOATA,XCRCL 

XBIT 

X8TAT,ND,-l-*8IP.»XPARfL0LE,XSTAT RESET BIP, XPAR , LOLE 



XBUMP 

,LDLE,XSTAT 

XSOH f TZ 
XSTAT,OR,XPAR 



TSTIR ,BIP,XSTAT 



XNCNTL.FZ 

, OR, BIP 

XSTAT,ND,»l-LOLE 

XCRCL.0 

XCRCH 
XBUMP 



DLE»STX ? 

SET XPAR IF SO 

BLOCK ALREADY IN PROGRESS? 



THERE IS NOWl 
CLR LOLE 

CLR CRC 



TSTIR ,XPAR,XSTAT 

BRA XXDLE, FZ 

DORI XSTAT,OR,LDLE 

BRA DOXCRC 

TSTIT ,LDLE 

BRA XNCNTL,FZ 

DORI XSTAT,OR,LOLE 



TRANSPARENT? 
NO, SET LDLE 

LEADING OLE? 
NO, SET LDLE 



PAGE 17 



423*. 



COMM/TXT 



424, 

485, 
4861 
427. 



428. 

429. 

430'. 

43il 
432, 
433'. 



434, 
435. 



0(364271 
006430L 
006431L 

006432L 

00164331 
8064341. 
006435L 

006436L 
006437). 

006440L 
006441L 
006442L 

006443U 
006444L 
006445L 



01110001 
01000101 
11000010 
11001111 

01110001 
01000101 
11010011 
01010011 
01101111 
01010001 

01101111 
11001111 

01010001 
01101111 
11001111 



J111U00 

00000001 
01001011 
00100101 

11111011 
00001000 

11011100 

00000100 

11111011 

00010000 

11111101 
00100101 

00110010 
11111101 

00100101 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

m JAM • 
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BISYNC XMTR 

TSTIR ,1,XPNTR 
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BRA 
BPA 



XBUMP,FZ 
XBIT 



XFILL TSTIR ,XPAR # X8TAT 

BPA XSYN,TZ 

OORI XSTAT f OR,FIUP 

LORI XDATA,OLE 

BRA XBIT 

XSYN LORI XOATA,SYN 

BRA XBIT 



DATA (NORMAL) OR STATUS (COM2) 

COM2 

NORMAL* SEND IT AGAIN 

TRANSPARENT MODE? 

JUST SEND SVN IF NOT 
ELSE SET F1LIP 

AND SEND OLE 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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4381 
439, 
440, 
44ll 
442. 
443' f 

44S! 
446, 
447. 



448' 

449. 



COMM/TXT 
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450. 
4Si; 



452. 
453* 

4541 



006446L 
006447L 
006450L 
006451L 
006452L 
006453L 
006454L 
006455L 
006438L 
0064571 
006460L 
006461L 



01110001 

fll010W10 
li 11 11 

11000000 
01110001 
01010101 
01110011 

01101111 

01U0001 
0110U11 
01010001 

11001111 



10111011 

00100000 

11111011 

00100(101 
UU1001 

111000R0 

11111011 

11111011 

11111110 

11111101 

00100101 
01001010 



, XSTAT USAGE 

t 0, 1,2,3,4 -— 



5,6,7 »•« 8C0UNT (BITS PER CHARACTER) 



t XBUF STATUS 

„— ROY CPRFCEDIN5 BYTE IS DATA TO XMIT) 
, 1,2,3,4,5,6,7 -•* 

GSX DORIR XSTAT, AC, BCOUNT, XSTAT, CC BUMP THE BIT COUNT 



BRA XBIT,FC 

OOTIR ,ND,WLNGTH, COMMODE 

DORR XSTAT, OR, XSTAT 

LDRR XO*TA,SYNCODE 

LDTA XBIT 

BRA CHKBUF 



JUST SENO A BIT IF NOT DONE WITH BYTE 
GFT THE WORD LENGTH 

AND PUT IT INTO XSTAT 

SET UP FOR FILL IN CASE BUF NOT ROY 

SET UP RETURN ADDRESS 
GO CHECK FOR MORE DATA 
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457. 
458, 
459, 
460. 

46i; 

462. 
463. 
464. 
465* 
4661 
467*. 
468' 
469, 
470. 

47ll 
4721 
473, 
474. 



COMM/TXT 



475*. 



476'. 



477' 

478, 
479, 

4801 



48i; 

482. 
483^ 
484, 
485, 
486, 
487, 
488, 
489, 
490, 

49i; 
4921 

493. 



494. 
4951 
496. 

4971 
498, 
499. 

500*. 



006462L 
0064631 
006464L 
006465L 
008468L 
006487L 
006470L 
006471L 
006472U 
006473L 
006474U 

006475L 
006476U 
0064771 
006500L 
006501L 
006502L 
006503L 
006504L 
006505L 
0065061 
006507L 

006510L 
006511L 

006512U 
306513L 
006514U 
006515L, 
006516L 

006517U 
006520L 

006521U 
006522U 
006523L 

006524L 
006525L 
006526L 



01110001 
U010010 
0U10001 

0100010! 
11010011 

01000101 

1101001! 

01110001 

01010101 
01010011 
01101111 

01110001 

0110HU 
01110001 
01010100 

01101111 

01 110001 
01000101 
11010010 
01110001 
00110111 

11011H1 

01010001 
11011111 

01011001 
01010001 
11001111 
11010010 
01010001 
001 1011! 
1101111! 



10111111 

10111111 
11111011 

00000011 

10110101 
00000010 
10101011 
11111001 
11100000 
00000001 
11111011 

11111110 

mum 

10111111 

00000001 

11111111 
11111011 
00000010 
10110111 
11111101 
00100011 
0000001 1 

00000000 
10111001 

11110010 
10110010 
01001010 

1010U10 
00000001 
001000! 1 
00000011 



01010001 00000010 
01101111 11111011 
11011111 11000010 

01010010 00100000 
0110111! 11111011 
0111000! 11111101 
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* 

i 
t 
* 

ASX 



XSTAT USAGE 



XBUF STATUS 



1 
2,3,4 --«• 
5,6,7 -« 







1,2,3,4,5,6,7 •»«■» 



CIP (CHARACTER IN PROGRESS) 

SIP (START ELEMENT IN PROGRESS) 



8COUNT (BITS PER CHARACTER) 



ROY (PRECEOING BYTE IS DATA TO XMIT) 





ASETIC 



DECXIC LOTR 
DECXICi DECT 
tDRT 
TSTIR 



AXBIT 

AXSP 

AXIDLE 



BPGX 
LDTA 
BRA 
AXIDLEl BRA 
LDPI 



AXSTRT 



AXCIP 



LOTR XIC0UNT,CC 
BRA OECXICl,FZ 
TSTIR ,SIP+CIP, XSTAT 

BRA AXIDLE, TZ 

TSTIT ,SIP 

BRA AXCIP, TZ 

DOTIR , NO, WLNGTH, COMMODE 

DORI XSTAT, OR, CIP 

LDRR XICOUNT,AISTOR 

XICOUNT.CC 

XICOUNT 
, SIP, XSTAT 

AX8P,FZ 

XDATA 

SDLCOT 

CRETURN 


AXBIT 

AXIDLEl 
AXIDLEl 
CMKBUF 
AXSTRT, FZ 
SDLCOT, 1 

BRA CRETURN 

LDRI XSTAT, SIP 

BRA ASETIC 

DORI XSTAT, AC, BCOUNT 

LOTR XDATA 



BRA 
LOTR 
LOPT 
BRA 

LOTI 
BRA 



GET INTRP CNT 

DECREMENT IT IF NOT DONE WITH SIT 

START OR CHARACTER IN PROGRESS? 

IDLE IF NOT 
START IN PROGRESS? 
CHARACTER IN PROGRESS IF NOT 
GET WORD LENGTH 

SET CHARACTER IN PROGRESS, CLEAR SIP 

INIT INTERUPTS/BIT 

GET ICOUNT 
DEC IT 
REPLACE IT 

SENDING START ELEMENT? 

SEND SPACE IF SO 
ELSE OUTPUT THE LSB 



SEND SPACE 



SET RETURN ADDRESS 
CHECK BUFFER FOR DATA 
SEND A START ELEMENT IF RDY 
ELSE SEND SOME MARK 



SET START IN PROGRESS 

BUMP THE BIT COUNT 
SHIFT THE DATA 



( 

( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
< 
( 
( 
( 
( 
( 



( 
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50il 

5021 
503, 
S04. 



505. 

306'. 



507*. 

508* 
509. 



510' 
511. 

512'. 

513* 
514, 
515. 



COMM/TXT 



006527L 
0065301 
006531L 
8065321, 
006533L 
006534L 
006535L 
006536L 
006537L 
006540L 
006541L 
006542L 
006543L 
006544L 
006545L 
W06546L 
006547L 
006550L 
006551L 
006552L 

006553L 
006554L 



00010111 
01101111 

110100100 
01010001 
01101111 
01010001 
01101111 
0U10001 
01110010 
0U01111 

01110001 
01000101 
11010010 
01110001 
01010010 
00010111 
01110010 
0110111! 
01110001 
0100010! 

11010010 

11011111 



11010010 
11111101 
11000010 
00000000 

11111011 

11111111 

11111101 
11111110 
0011U10 

11111111 

U111001 
00000010 
11000000 
10111110 
00000001 
10010010 
00111110 
11111111 

111H001 

00000001 
J 1000000 
11000010 
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SHIFT 
LORT 
BRA 
LORI 

LORI 

DORRR 



BRA 
DOTIR 

SHIFT 
DORR 



BRA 
BRA 



SR,CF 
XDATA 
ASETIC,FC 
XSTAT,0 



INIT ICOUNT IF NOT OONE WITH CHARACTER 
CLEAR CIP 



XDATA,0377 SET UP STOP ELEMENT 

XICOUNT,AC,AISTOR.AISTOR,C0 ASSUME 2 STOP ELEMENTS 



TSTIR ,2, COMMODE 



OECXICFZ 
,AC»1#AIST0R,CC 



IS IT 2 STOP ELEMENTS? 

JUMP IF SO 

ELSE ASSUME 1.5 STOP ELEMENTS 



SR » 

XICOUNT,AC,AISTOR,,C0 " 



TSTIR ,1, COMMODE 



OECXICFZ 
ASETIC 



IS IT 1.5 STOP ELEMENTS? 

JUMP IF SO 

ELSE MUST BE 1 STOP ELEMENT 
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sis: 

519. 

520, 

521. 

522* 

523. 

524, 

525, 

526. 

527. 

5281 

529. 

530' 

531, 

532, 

533, 

534, 

535. 

5361 

537, 

538, 

539. 

540' 

541 

542, 

5431 

544, 

545, 

546, 

547. 

5481 

549, 

550, 

551. 

5521 

553, 

554, 

555. 

556* 
557, 

558*; 

559, 
560, 
561, 
562, 
563, 
564. 



5651 
566. 



0065551 



SIOUTI 



SIO 



SIMOT 



( 167) SICOUT 

£062 167) SIOUT 

(111 167) SICMOUT 

(113 167) SIMQUT 



MOVE (A) TO XMIT BUFF COM2 7,4/5,2 

MOVE (A) TO XMIT BUFF WRITE 9,4/7',2 

MOVE C BYTES FROM (HL) TO X8UF COM2 

MOVE C BYTES FROM (ML) TO XBUF WRITE 

* 4,85/7.35 +7N 
SETS TZ IF BUFFER FULL 



IF USER THEN IVIOL 

ELSE LUF <- XPNTR,ANO > .0376-UXPNTR,OR f l + l 
IF TZ THEN SIOEXIT 

ELSE MAR <m UXPNTR, OR'.! 

IF ( 167) OR (111 167) THEN (MAR) <- 3 
ELSE (MAR) <m i 

TEMPI <m UXPNTR 
UXPNTR «« UXPNTR+2 

IF (HI 167) OF (113 167) THEN SIMOT 
ELSE MAR <m MAR-l 
(MAR) «m (URA) 
END 
END 
END 



MAR 


*w 


HL 




HL 


<m 


HL + 1 




MOR 


<" 


(MAR) 




MAR 


«*• 


XBUF, TEMPI 




(MAR) 


<» 


MOR 




URC 


<<• 


URC»1 




IF TZ 


THEN SIOEXIT 




ELSE IF SRVREQ THEN 


SRVRpT 






ELSE SIO 





SIOEXITI PSW <- PSW,AND,^1«SWRPT 
END 



006555L 


0011000! 


11011100 




TSTIP 


,SWUSER,PSWI 


006556L 


01000101 


00000100 








008557L 


11010010 


00000001 




BRA 


CIVIQL,FZ 


00656SDL 


010109101 


01110100 




BAL 


,SIOT 


006561 L 


11011010 


10001011 




BRA 


SIOCB, F», 10 


006562L 


01010001 


01101111 




BAL 


, SIMOT 


006583L 


00110111 


00001001 




STB 


OIMP 


006564U 


01101111 


11110000 


SIOCB 


8AS 


LINK 


006565L 


01110001 


11111000 


SIORPT 


DOPIR 


MAROL, OR, 1, UXPNTR 


006566L 


01010011 


00000001 








006567L 


00110111 


11000000 








006570U 


01101110 


01110001 




INCR 


TEMPI 


006571L 


0U10001 


11111100 




DOTIR 


,ND,0376,XPNTR 



USER MODE? 

USERS CAN'T DO THISJ 

ASSUME SINGLE MOVE (EVEN) 
JMP IF ( 167) OR (062 187) 

SET UP FOR (HI 167) OR (113 167) 
SET UP FOR ZERO TEST 

SET TZ IF FULL 

29I« 23FEB78 ■» HJS - SAVE A WORD 
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567. 

5681 
5691 

571. 

572; 

573, 
5741 
575. 

576'. 

577*. 

5781 
579; 
580. 
58 il 

582'. 

583; 
584. 

585*. 



586. 
587*. 

588*. 
589'. 
590*. 



591 
592. 
5931 
594. 



0065721 
006573L 
006574U 

0065751 
006576U 
006577U 
006600L 
006601L 

006602L 
006603L 
006604L 
0W6605L 
006606L 
006607L 
006810L 
0066UL 
006612L 

006613L 

006614L 

0066151 

>006616L 

>006617L 

006620L 
006621L 
006622L 
006623L 
006624U 
006625L 
006626L 
006627L 
006630U 
006631U 
006632L 
006633L 
006634L 
006635L 
006636L 
006637L 
006640L 
006641L 
006642L 
006643L 

006644L 
006645L 
006646L 
006647L 



01010101 

01110100 

00110111 
11010011 
01010001 
00110111 
01010001 
11011001 

01010001 
00110111 

01110001 
01101111 
0101001P! 
01101111 
11010100 

1! 1 1 1 1 

11101111 

00110111 

00110001 

00110111 

01011*10! 
1100111! 

00110001 
00U000! 
00110U1 
00110001 
00010110 
00110111 
00110001 
00110110 
11010100 
1 1 1 1 1 1 
0101000! 
00110111 
01110001 
0011011! 
00110001 

00110111 

00110001 
01010100 
0<nt011! 
11010011 

00110001 
11010100 
11010111 
11010011 



11111110 
00110001 
00000110 
01310100 
11011110 
1U00000 
0000001 1 
01111100 

00000001 
00100001 
10111000 
10110001 
00000010 
11111000 
01110111 
00000101 
W0000000 

00001101 
11010000 
00100001 
11111111 
11111111 

11000110 
11100101 

01000111 

10010000 
&1110010 
10000110 
10110000 
10000101 
01100111 
00000101 
11011110 

1 1100000 
10110001 
11000000 
00110110 
00100001 
11010010 
00000001 
10000010 
01010100 

00110000 
01011010 
00000101 
10PI01010 



SI0W8 



SIOT 



DOPR 



BRAX 



SIMOT OLOX 



LUF, SB, TEMPI,, C0 



BRA 
tOPI 


SIQEXIT,TZ 
MARCH, XBUF>8 


LOTI 
BRA 


3 

SI0W8, T#,IZ 


LOTI 
LDPT 
LORR 


1 

MOW 

TEMPI, UXPNTR,CC 


OORI 


UXPNTR,AC,2 


MWAIT 


,CMEMPF 


BRR 


LINK 


STB 
LOPP 


OMAR 
MOW,URI+URA 



FETCHW 



ML2MR,,SMR 



DAOOP URO+UR,MARI 



595, 

595; 

597. 0&6650L 00110111 00001000 



MWAIT 


,CMEMPF 


LOPI 


MAR0H»XBUF>8 


LOPR 


MAROL. TEMPI, ,CC 


LOPP 


MDW.MDR 


OOPIP 


UR0+URC,SB,1,UR 


BRA 


SIOEXIT,TZ 


LOTP 
MWAIT 


SRVREO 

,CMEMPF 


BRA 


SI0RPT,TZ 


STB 


IIMP 



00 NO MORE IF FULL 

ELSE MARK LOCATION USED 

LIKE EX*CQM2 IF ( 1675 OR till 167) 

29AUG77 

LIKE EX-WRITE IF C062 167) OR Cl 13 167) 
n 

SAVE USER POINTER 

INC USER POINTER BY 2 

" f400) 



POINT AT BUFFER DATA LOCATION 
MOVE A TO BUFFER 

AND CALL IT QUITS 



READ CHL) 



INC ML 



(200) 



POINT AT BUFFER 
USE UN»INCREMENTED UXPNTR 
MOVE DATA FROM CHL) TO BUFFER 
DEC C 

QUIT IF IT'S NOW 

CHECK FOR SERVICE REQUEST 



(200) 



REPEAT IF NO SERVICE 

291 m HJS * 23FEB78 « REORGANIZATION 

RESTORE IMP IF IT WAS 111 OR 113 
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SIQUT - TRANSMIT BUFFER LOAO INSTRUCTION 

59S'. >00665iL 01011010! llilllU BRAX SRVRPT HANDLE SERVICE IF IT'S THERE 

>0<*S«5J>L 11001111 llHUll 
399* 

600*1 006653L 00110001 U011100 SIQEXIT DOPIP PSWO, ND,*l-SWRPT f PSWI CLEAR THE REPEAT FLAG 

006S54L 01010101 11011111 

006655L 00110111 10001100 

60ll >006656L 01011001 llHUll BRAX FETCMW AND IT'S ALL OVER1 

>006S57L 11001111 11111111 
602'. 
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606, 006660L 

607, 

608' 

609, 

610. 

6$i; 

6 1 2 « 
6 1 3, 
614, 
615. 
616* 
617, 
618j 
619, 
620, 
621, 
622, 
623, 
6241 
625. 



626. 
6271 
626, 

629, 

630. 



631. 

632'. 

6331 

634* 
635, 
636, 
637; 

638, 
639. 

640'. 

64J*. 

642!, 



006660L 
008661L 
006662L 



00110001 
01000101 
11010010 



11011100 

00000100 

00 a a 005*1 



006863U 11011000 00111100 



006«64L 
006665L 
0«666^L 
006667U 
006670L 
00667lt 
0066721 
0066731. 
006674L 
006675L 
006876L 
0066771. 
006700L 
006701L 
006702L 
006703L 

006704L 
>006705L 

►006706U 



00110001 

01101111 
00110001 
01101111 
01010001 
00110111 
01010001 
01101111 
01101111 
01101111 
01101111 

01101111 
01101111 
01010001 
0110111J 
01010001 
01101111 
01011001 
11001111 



11010000 
11111001 
11010001 
11111110 
00000001 

00100011 
00000000 
11111100 
11U1000 

liitiiit 

11110100 
11111010 
11110110 
11100000 
11111011 
00000100 
11110011 
Ullllll 
11111111 



SISTARTl 



( 1655 
(111 165) 



SISTART 
SISYNC 



SISYN 



SISYN 



IF USER THEN IVIOL 

ELSE IF FIZ THEN SISYN 
ELSE COMMODE <- A-REG 
SYNCODE <- 8-REG 
SDLCOT <» I 
XPNTR <- 
UXPNTR «• 
XICQUNT <«• 
RPNTR <•» 
RPNTR «• 
RICOUNT <- 

XSTAT <» BC0UNT«7 
RSTAT <- SYNWAIT 
END 

TSTIP ,SWUSER,PS«I 

BRA CIVI0L,FZ 

BRA SISYN, F#,IZ 

LDRP COMMODE # URI+URA 

LORP SVNCOOEtURI+URB 

LDPI SDLCOT, 1 

LDRI XPNTR,0 

LORT UXPNTR 

LDRT XICOUNT 

LORT RPNTR 

LDRT URPNTR 

LORT RICOUNT 

LDRI XSTAT, 0340 

LDRI RSTAT, SYNWAIT 

BRAX FETCHI 



COMMENSE COMMUNICATING COMMAND 4,65 
SFEK SYNC (LOOK FOR SYN^SYN) 5,10 



*** ',• MISSING 



*** ILLEGAL CHARACTERS (000) 
*** SEEN INSTEAD OF ' , ' 
*** SEEN ON DNE OF THESE LINES 
*** WARNING FOR BAD FILE 

*** '.' MISSING 
USER MODE? 

USERS CAN'T DO THIS1 

JUST SET SYNWAIT IF IMP*0 

ApREG m* COMMODE 

B-REG -> SYNCODE 

SEND MARKS 

INIT XMT BUFFER POINTER 

AND USER XMIT BUFFER POINTER 
AND XMIT INTERUPT COUNTER 
AND RCV BUFFER POINTER 
AND USER RCV BUFFER POINTER 
AND RCV INTERUPT COUNTER 
BCOUNT-7, ALL ELSE RESET 

ALL ELSE RESET 
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645' 
646, 
6471 
648. 
6491 
650. 

est; 

652. 
633' 
654. 
655'. 
656, 
657, 
658. 
6591 
660, 
661, 
6621 
663. 
664]. 
665. 



006707L 



sicioi 



667* 

668, 
669. 
67gl 
671. 



672. 

6731 
674. 

675'. 

6761 
677. 
678'. 

679*. 
680' 



68lC 



682'. 
683'. 
684'. 



0067B7U 
006710L 
0067HL 
006712L 
P06713L 
006714L 

006715L 

006716L 

006717L 

>006720L 

>006721L 

006722L 

0<*6723L 

>006724L 

>006725L 

006726L 

006727L 

006730U 

>006731L 

»006732L 

006733L 
006734L 
006735L 
006736L 
006737L 
006740L 
006741L 
006742L 
006743L 



00110001 
01000101 

11010010 
11011010 
00110111 

00110001 
11011&01 
00110001 
00110111 
01011001 
11001111 



11011100 

00000100 
00000001 
00101001 
00001001 
00010111 
00101101 
1 1010000 
00100100 

lliillU 

Hiiini 



01010101 00111111 
00110111 10000000 

01011001 11111111 

H001H1 muni 



11011001 
001109101 
00110111 
01011001 
11001111 

00110W01 
01010101 
00110111 
01110001 
01010101 
01110105' 
00110111 
01110001 
01010101 



00100100 
11010000 
00100101 
11111111 
1 11 1! Ill 

00010000 
01111000 
10000000 
11111100 
11111110 
00111000 
910000110 
11111001 
00000111 



161) SIMQOIN 



(062 161) SIMQDQUT 
(111 161) SIACUIN 
(113 161) SIACUOUT 

IF USER THEN INVIOL 
ELSE CASE OF IMP 

0001 A*REG 
LUF 
LUCF 
0621 SDLCMD 
1111 A-R£G 
113* ACUQT 

END 



TSTIP 

BRA 
BRA 
STB 
LDTP 

BRA 
LOPP 

BRAX 



SIACUIN DOPI 
BRAX 



SIMOD BRA 
SIMODOT LDPP 

BRAX 



,SWUSER,PSWI 

CIVIOL,FZ 
SIMOD, F*, 10 
01 MP 
ACUIN 

SIACUIN, T*,IZ 
ACUOT,URI*URA 

FETCHI 



URO+URA,ND,077 
FETCHI 



SIM0DIN,T#,IZ 
SDLCMD,URI+URA 

FETCHI 



GET THE MODEM AND XMIT BUFFER STATUS 4,45 

5.1 IF SDLC MODE 

SET TZ IF XMIT BUFFER EMPTY 

SET TC IF LINE ACTIVE (SDLC) 
SET THE MDDEM CONTROLS 5,3 

GET THE ACU STATUS 5',55 

SET THE ACU CONTROLS 5,5 



MODIN, AND. 0170 

UXPNTR»XPNTR 

LINE ACTIVE 

A*REG 

ACUIN, AND. 077 

A'REG 



USER MODE? 

USERS CANiT DO THIS! 
MODEM CONTROL IF ( 161) OR (062 161) 
(111 161)«>TIZ, (113 161)«>FIZ 
GET THE ACU INPUT AND ALLOW TIZ SETUP 
(111 161)»>ACUIN 
ELSE 00 ACUOUT 



ONLY 6 BITS * 15JUL77 



( 161)»>M0DIN 
ELSE DO MODOUT 



SIMODIN DOPIP URO*URA,ND, 0170, MODIN ONLY 4 BITS - 15JUL77 



DOTIR ,ND,0376,XPNTR 
DOPR LUF,SB,UXPNTR,,C0 
DOTIR , NO, 7, COMMODE 



SET TZ IF XMIT BUFFER MT 



CHECK MODE m 29AUG77 
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COMM/TXT 



685; 
686' 
687, 
688, 
6891 
6901 
691, 
692. 



693'. 
694'. 



MICRO-PROCESSOR 
SICIO - MODEM 



COMUNICATIONS 
AND AUTOCALL 



006744L 
006745L 
006746L 
0067471 
006750L 
006751L 
006752L 
006753L 
006754L 
>006755L 
>006756L 



01000000 
1 10100J 

01 110001 
00010111 
01010101 
01101111 
00010111 
01010010 
00110111 
01011001 
11001111 



00000011 
9*0010010 
11110011 

10110010 

11111110 
11110011 
10010010 
10000000 
00000111 

11111111 

! 1 1 1 1 1 1 1 



TSTIT 


XR,3 


BRA 


SICI0X,FZ 


LDTR 


RSTAT 


CCLR 




OOTI 


,ND,#1*IA 


LORT 


RSTAT 


SHIFT 


SR 


OOPI 


LUCF,AC,0200 



SUPPORT - JAM * 
UNIT INSTRUCTIONS 

IS IT SDLC? 
ALL DONE IF 



78JUL20 11»44 



- 29AUG77 
NOT m 29AUG77 



LA-LSB »> LINK 
RESET LA 

AND PUT RSTAT BACK 
LA -> MSB 
LA •> CARRY •> UCF 



SICIOX BRAX 



FETCHI 
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697. 

6981 



699' 
700. 

701*. 

7021 

703'. 

7041 

7051 
7&61 
7071 
7081 



006757L 
006760U 
006761L 
006762L 
006763L 
006764L 
006765L 
006766L 
006767L 

006770L 
006771L 
>006772L 
>006773L 
»006774U 
>006775L 
>006776L 
»006777L 

001000 
006000 

006000 



j u i u 1 1 
1 1 1 1 1 u 1 
llllilll 
111H111 

11111111 

1111U11 

iiuiiii 

1 1 1 1 11 11 

11111111 

01010001 
01101111 
01011001 
11001111 
01011001 

11001111 
01011001 
11001U1 



11111111 
11111111 
llllllll 
1 1 1 1 1 1 1 1 

iitmii 
uiiiiii 
iiuiiii 
iiuiiii 
iiuiiii 

00000000 

11111001 

iiuiiii 
iiuiiii 
iiuiiii 
iiuiiii 
iiuiiii 
uiiiiii 



PAD 



CMEMPK LDRI 
CMEMPF 8RAX 
CRETURN BRAX 
CTVIOU BRAX 



CDOXUEN EOU 
USE 
SKIP 



-S-010, AND, 0377 



COMMODE, 

MFMPFS 

SRVNXT 

ivious 



S-COOXP 

COQXL 

CDOXLEN 



TURN COMM OFF IF MEMORY FAULT 
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7li' ? 

712; 

7131 
714, 

7i5l 

716. 

717; 

718. 
719. 

72< 
72 1. 

7221 
7231 
7241 
7251 
7261 
727, 
728. 



COMM/TXT 
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90700* 
000000 
007000 
000000 
007000L 



COQRL 
COORP 
COORL 

COORP 

* 



ORG 
ORG 
USE 
USE 
LQC 



COOR 



COORL 

COORP 

CD0RLi2 



LOGICAL SPACE OEFIN£0 IN PLACE 
PHYSICAL SPACE RELOCATABLE 
USE THEM BOTH 

PUT THE COOE IN PHYSICAL SPACE 
WITH AOORESSES IN LOGICAL SPACE 



007000L 
007001L 
007002L 
007003L 
007004L 
007005L 
00700«L 



01110001 
01000101 
11010010 

01000101 
11000011 
01000101 
11010011 



11111001 
00000100 

01111001 
00000010 
10001101 
00000001 
11000110 



SOOR COMES HERE TO SEE IF BJSYNC, GENSYNC, ASYNC, OR SDLC 

TSTIR ,4,C0MM00F 

IT'S ASYNC (XX XXX 1XX) 

IT»S 9ISYNC (XX XXX 00X3 

IT'S GENSYNC (XX XXX 010) 
ELSE IT'S SOLC (XX XXX 011) 



BRA 


ASR,FZ 


TSTIT 


1 2 


BRA 


BSCRiTZ 


TSTIT 


il 


BRA 


GSR,TZ 
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73i: 

732. 
733' 
734, 
735. 
736'. 
7371 
738, 
739, 
740; 
74il 
742, 
743, 
744, 
7^5, 
746, 
747, 
748, 
749. 
750' 

75i: 

752, 
753, 
754. 



COMM/TXT 



755'. 



756, 
7571 
758, 
759. 



7601 

76i; 

762, 

763, 
764. 
765'. 
766, 
767; 

768' 
7691 
770, 
771, 
772. 

773* 
774, 
775; 
776. 



007007L 
007010L 
007011L 
007012L 
007013L 
007014L 
007015L 
007016U 
007017L 
007020L 
007021U 
007022L 
007023L 
007024L 
007025L 
007026L 
007027L 
007030L 
007031L 
007032L 
007033L 
007034L 
007«35L 
007036L 



007037L 
007040L 
007041L 
0070421 
0070431 
007044L 



00110001 

01010101 
00010111 
110000110 
01110PJ01 

010101011 
01101111 
01110001 
01101111 
01010101 
01010011 
01101111 
01110001 
01010101 
01000000 
11010011 
01000000 
11000011 
01110001 
00010111 
01101111 
01110001 
01000101 
11010010 



00110001 
01010101 
01110000 
0U01111 
00010U1 
01000101 



00010110 
00000001 
10110010 
10101010 
11110011 
00000001 
11110011 

11111001 
11110001 
00011111 

00100000 

11111001 
11110001 
11100000 
11000000 
000000U 
1 1100000 
10110100 
11110101 
10010010 
11110101 

11110011 
00000100 
&0000011 



00010110 
00000001 
11110110 
11110110 
10110010 
00000001 
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RSTAT USAGE 




I 
2 
3 
4 



— * LINE ACTIVE 

*•• 

«"** IDLE (WAITING FOR FLAG) 

"»<•■» 

PIP (FRAME IN PROGRESS) 



5,6,7 m— BCOUNT (BITS PER CHARACTER) 

( 3 MSB OF COMMODE USED FOR ONE'S COUNT ) 



RBUF STATUS 



•7 ) 



SOLCR 



—« • ROY (PRECEOTNG BYTE IS RECEIVED DATA 
1,2,3,4,5 -••» 

6 — » GOOD END OF FRAME (0 UNLESS BIW ■ 1) 

7 »— END OF FRAME tIF BIT*6 ■ 1, PRECEDING BYTE IS 01761 

IF BIT-fi ■ 0, PRECEDING BYTE IS 0177J 
LAST TWO BYTES RECEIVED ARE CRC) 



STRIP OFF GARBAGE 

NEW BIT *> LINK 

JMp IF NEW BIT ■ 1 

SET 'LINE ACTIVE' ON A 



LDTP 


SDLCIN 


DOTI 


,ND,1 


CCLR 




BRA 


GOTAONE#FZ 


DORIR 


RSTAT, OR, LA, RSTAT 



LDRR 

DOTI 
DOTI 
LOPT 
DOTIR 

T8TIT 

BRA 

T8TIT 

BRA 

LDTR 

SHIFT 

LORT 

TSTIR 



BRA 
f DO THE CRC 



SDLCR1 



DOTR 
LDRT 

CCLR 
TSTIT 



TEMPI, COMMODE 

,ND,037 
, OR, 040 
COMMODE 
,ND, 0340, TEMPI 

XR,8<5 

CRETURN.TZ 

XR,7<5 

RFLAG,TZ 

RDATA 

SR 

RDATA 

, IDLE, RSTAT 

CRETURN,FZ 



SAVE ONES COUNT (3 MSB OF COMMODE) 

CLEAR ONES COUNT 

(LOGICAL CNT«0,PHYSICAL"1) 

AND PUT IT AWAY AGAIN 
GET ONES COUNTER FROM SAVED COMMODE 

FIVE ONES? (PHYSICAL»6) 

INSERTED ZERO IF SO 
SIX ONES? (PHYSICAL-7) 
FLAG IF SO 
SHIFT NEW BIT INTO DATA 



DO NO MORE IF IDLE 



DQTIP , NO, 1, SDLCIN 



, XR#RCRCH 
RCRCH 

.1 



GET THE BIT AGAIN 



PUT THE FEEDBACK IN THE LINK 
FEEDBACK ONE OR ZERO? 
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777' 
7781 



779. 



7801 

78lJ 

782. 

783 

784, 

785, 

786, 

787. 



788, 
789, 
790, 
791. 
798*. 

793; 
794. 



795, 
7961 
797, 
798'. 



7991 

8001 
801. 

802'. 
803'. 



804. 
805* 

806. 



807, 
808. 



809, 
810; 



811*. 



007045L 
007046L 
007047L 
007050L 
007051L 
007052L 
007053L 
007054U 
007055L 
007056L 
007PI57L 
0PI7060L 

007061U 
007062L 
007063L 
007064L 

007065L 
007066L 
0070671 
007070U 
0070711 
007078L 
007073L 
007074L 
007«75L 
0070761 
007077L 
007100L 
007101L 
007J02L 

007103L 
007104L 
007105L 
007106L 
007107L 
007110L 
007111L 
007U2L 

007113L 
007114L 
007115L 
007H8L 
007117L 
007120L 
007121L 
007122L 
007123L 
007124L 



11000011. 
01010000 
01101H1 

01110001 
01010000 
01101111 
01110001 
00010111 
0U0H11 

01110010! 

00010111 

01101111 

0U10001 
01010010 
01101111 
11010000 

01000101 
11000010 
01110001 
01000101 
11000011 
01110001 
01000000 
11000011 
00110000 
11000010 

0111000! 
01010011 
01101111 
11001111 

01110001 
01010101 
01010011 
0U01111 
01110001 
01010101 
01101111 
11011111 

01110001 
01000101 
11000010 
01010001 

01101111 
0110111! 
0111000! 

01010101 

0110111! 
11011111 



1101 

0001 
1111 
1111 

0000 
1111 
1111 
1001 
1111 
1111 
1001 
!U1 



0100 
0000 
0110 
0111 
1000 
ill! 

0111 

0010 

0111 
0110 

0010 

0110 



10110011 
00100000 
11110011 
00000011 

00010000 
01000101 
1UU001 
00001000 
11000000 
11110101 

ilium 

11000000 
01010001 
10111100 
11110011 
00010000 
11110011 
01000101 

U110011 
00000001 
00000100 
11110011 
11111001 
00011111 
11111001 
00000011 

11110011 
00010000 
10011001 
11111111 

11110110 
11110111 
11110011 
00000001 
11110011 
00000011 
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F80 



SETFIP 



RFL.AG 



LOTR 


RCRCL 


SHIFT 


SR 


LORT 


RCRCL 


LOTR 


RCRCH 


SHIFT 


SR 


LORT 


RCRCH 



BRA 

TSTIT 

BRA 

TSTIR 

BRA 
TSTIR 

BRA 
TSTTP 
BRA 
OORIR 



BRA 
GOIOLE DOTIR 
OORI 
OORIR 



BRA 

TSTIR 

BRA 
LORI 

LORT 
OORIR 

BRA 



LINK IS STILL FEEDBACK 



OORIR RSTAT,AC,BCOUNT,RSTAT,CC BUMP THE BIT COUNT 



CRETURN,FC 

,FIP 

R8ETRDY,FZ 
,AOODET, COMMODE 

SETFIP, TZ 

XR, GLOBAL, RDATA 

SETFIP, TZ 
XR,SNIO 
GOIDLE,FZ 
RSTAT,QR,FIP,RSTAT 



DONE IF NOT 8 BITS 

FRAME IN PROGRESS? 
STORE THE BYTE IF SO 
ADDRESS MODE? 



GOT GLOBAL ADDRESS? -» 29AUG77 

YES, ACCEPT IT -29AUG77 
GOT MY ADDRESS? * 29AUG77 

IGNORE IF NOT -29AU677 
SET FRAME IN PROGRESS 



RSETRDY 

,NO,LA,RSTAT BITS, NO FIP 

RSTAT,OR,iniE SET IDLE 

COMMODE, ND, 037, COMMODE SET ONES COUNTER TO 7 (PMYSICAL"01 



CRETURN 

,FIP,RSTAT 

EOF.FZ 
RCRCH, 0377 

RCRCL 
RSTAT,ND,LA,R8TAT 

CRETURN 



FRAME IN PROGRESS? 
MUST BE END OF FRAME IF SO 

BITS, NO FIP, NOT IDLE 



( 
( 

( 

( 

( 

( 

( 

( 

( 

( 

< 

( 

( 

( 

< 

< 

( 

< 

( 

( 

( 
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812' 
813. 

814* 

815. 



8161 
817, 
818. 

819' 

820. 

821*. 



COMM/TXT 
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822. 
823, 
824. 
825'. 



826. 

8271 
828: 



822. 
830. 

831*, 
832 • 
833. 



007125L 
007126L 
007127L 
007130L 
007131L 
007132L 
007133L 
007134L 
00171351 
0071361 
007137L 

f07l40L 

007141L 
007142L 
007143L 
007144L 
007145L 

007146L 
007147L 
007150L 
007151L 
007152L 
007153L 
007154L 
007155L 
007156L 
007157L 
007160L 
0071611, 



01110001 
010510101 
11010011 
01010010 
01101111 
01010101 
11000010 
01110001 
01000101 
11000011 
01010001 
01101111 
01110001 
01010101 
01101U1 

01010001 

11001111 

01010001 

0U01U1 

01110001 
010000810 
11000010 
0111001011 
01000000 
11000010 
01010001 
01101111 
01010001 
11001111 



10111001 
111000)00 
00000011 
00100000 

11111001 

U100000 
11100110 
11110011 
00010000 
10111100 
01UU11 

11110101 
11110011 
00000001 
11110011 
10000001 
$111*00100 

01111110 

11U0101 
11110110 
10000101 
10011110 

11110111 

01001111 

10011110 
00000001 
11110011 
11000001 
01000100 



GOTAONE TSTIR , 0340 , COMMODE , CC 

BRA CRETURN,TZ 

DORI COMMODE. AC, 040 

DOTI ,ND,0340 

BRA SDLCR1,FZ 

TSTIR ,FIP, RSTAT 

BRA GOIOLE#TZ 

LDRI RDATA, ABORT 

BADCRC OORIR RSTAT , NO, LA, R8TAT 



EOF 



LOTI 
BRA 


0201 
RPUTRBS 


LORI 


RDATA, FLAG 


TSTIR 


XR,GDCRCM,RCRCH 


BRA 
TSTIR 


BADCRC, FZ 
XR,GDCRCL,RCRCL 


BRA 
LORI 


BADCRC, FZ 
RSTAT, LA 


LOTI 
BRA 


0301 
RPUTRBS 



SEVEN ONES? 

WAIT FOR A IF SEVEN ONES CPHYSICAL"0) 
BUMP THE COUNTER 

LOOK AT THE COUNTER 

GO ON IF NOT SEVEN ONES (PHYSICAL»0) 

FRAME IN PROGRESS? 



TELL HIM ABOUT ABORT - 29AUG77 
BITS, NO FIP, NOT IDLE 

BAD END OF FRAME 
TELL HIM ABOUT IT 

TELL HIM ABOUT END FLAG «■ 2RAUG77 

CHECK CRC 



BITS, NO FIP, NOT IDLE 

GOOD END OF FRAME 
TELL HIM ABOUT IT 
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8361 


837, 


838, 


8391 


BAQ f 


841. 


8421 


843, 


844, 

845, 


846, 


847. 


848, 


849 


850, 


851, 


852, 
853, 


8541 
855, 
856. 



COMM/TXT 



857 
858. 





8*9, 
860J 






861. 




862, 
863; 






8641 
865, 
866. 




: 




867* 

868', 
869, 

870; 
87i; 

872, 
873, 
874, 
8751 
8761 
877, 
878J 








/ 






/' 


\ 




(' 


V 




879, 

880, 


( 


881 




8S2l 



007162L 
0071631 
007164L 
007165L 
007J66L 
007167U 
007170L 
007171L 
0&7172L 
007173L 
007174L 
007175L 
007176U 
007177L 
007200L 
007201L 
007202L 
007203L 
007204U 

007205L 
007206L 
007207L 
007210L 
007211L 
007212L 
007213L 
007214L 
007215L 
007216L 
007217L 
007220U 
007221L 
007222L 
007223L 
007224L 
0W7225L 



00110001 
01110001 
00010 HI 
01101111 
01110001 

01000101 
11000010 
01010010 
01101111 
11010000 
01000101 
11000010 
01000101 
11000010 
01000101 
11010010 
01110001 
01000000 
11010011 
01000000 
11010011 
01000000 
11010011 
01000000 
11010011 
01000000 
U010011 
01000000 

11010011 

01000000 
110100111 
0100009(0 
11010011 
01110001 
01110000 
01101111 



00010110 
101191101 

10010010 

11110101 
11110011 
00000100 
00110000 
00100000 
11U0011 
00000011 
00000001 
00100110 
00000010 
00010000 
00001000 
11001101 
11110101 
00010000 
11101010 
00110010 
11100110 
00000010 
11100010 
00000001 
11100010 
00000011 
11«11001 
W0100110 
11011001 
00011111 
11010110 
00101101 
11010001 
11110101 
111101H 
11110001 
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RSTAT USAGE 




1 

2 
3 
4 



EOB (END OF BLOCK) 

LDLE (LEADING OLE) 

SYNWAIT 

CRC CCRC IF EOB. XPAR IF NOT) 

SIP (BLOCK IN PROGRESS) 



5,6,7 -— BCOUNT CBITS PER CHARACTER) 



RBUF STATUS 



& ,.- ROY (PRECEDING BYTE IS RECEIVED OATA *7 ) 

1,2,3,4,5 — - 

6 — - GOOD EOB (0 UNLESS BIT-7»1) 

7 — EOB (END OF BLOCK? IF BIT»6 «1, PRECEDING BYTE AND 

LAST RECEIVED BYTE ARE CRC) 



BSCR LDTP 
LDTR 
SHIFT 
LDRT 
TSTIR 

BRA 
DORI 

BRA 
TSTIT 
BRA 
TSTIT 
BRA 
TSTTT 
BRA 
RCHKDLE TSTIR 

BRA 
RCHKSYN TSTIT 
BRA 
TSTIT 
BRA 
TSTIT 
BRA 
TSTIT 
BRA 
TSTIT 
BRA 
TSTIT 
BRA 
TSTIT 
BRA 
DORCRC DORRR 



SOLCIN 

RDATA.CC 

SR 

RDATA 

, SYNWAIT, RSTAT 

RSYNLOP,FZ 
RSTAT, AC, BCOUNT 

CRETURN,FC 

,EOB 

CHKCRCFZ 

,LDLE 

RLOLEiFZ 

,XPAR 

CHKXOLEiFZ 

XP, OLE, RDATA 



GET NEW BIT (BIT 0) 
LINMNEW BIT 
SHIFT IN NEW BIT 

WAITING FDR SYN*8YN? 



INC THE BIT COUNT 

RETURN IF NOT 8 BITS 
TIME TO CHECK CRC? 

LEADING OLE? 

TRANSPARENT? 

THEN CHECK FOR OLE 
RECEIVED OLE? 



ROLE,TZ 

XR,SYN 

RSYN,TZ 

XR,STX 

RSOB,TZ 

XP,SOH 

R80B,TZ 

XR,ETX 

REOB,TZ 

XR , ET B 

REOB,TZ 

XR,ITB 

RE0B1,TZ 

XR,ENQ 

RENO,TZ 

TEMP 1,XR,RCRCL, RDATA DATA ,XR ,T*>TEMP 1 
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883. 
884. 

88SI 

886 , 
887, 
888. 

SB9, 

890, 

890, 

890, 

890 

891. 

8921 
893. 



894, 
895, 
896, 
8971 
898, 
899, 
900, 
901. 



903j 
9041 

9914: 

904, 
904, 
904, 
905, 
906. 



907, 

908, 
909. 

910*. 



91 r. 

912'. 
9131 
914*. 



007226U 
007227L 

007230L 
007231L 
087232L 

007233C 
007234L 
007235L 
007236L 

807237L 
007240U 
007241L 
007242L 
007243L 
007244U 
007245L 
007246L 
0072471 
007250L 
007251L 
007252L 
007253L 
007254U 
007255L 
0072561 
007257L 
007260L 
007261U 

007262U 
0072631. 
007264U 
007265L 
007266L 
007267L 
007270L 
007271L 
007272U 
007273L 
007274U 

007275L 
007276L 
007277L 

007300L 
007301L 
007302L 
007383L 
007304L 
007305L 
007308L 
007307L 



01110010 

01110000 
01101111 

00010111 

0110111! 

00010111 
00010111 
01110000 
01101111 

00018111 

00010111 
00010111 
00010111 
01110000 
01101111 
01010101 
01110000 
01101111 
01110001 
00010111 
08010111 
00019111 
00010111 

01101111 
01010101 
0H10000 
01101111 
01110001 

00010U1 
00010111 
00010111 
00010111 
00010111 
01010101 
01110000 
0110111! 
01010001 
01101111 
11000100 
11010111 
00110001 
01010101 
00110111 
01010001 

0011011! 

0U10001 
00110111 
0111000! 

00110111 
01110001 



00110001 
10110001 

11110081 
11010010 
11110010 
11010010 
11010010 

11U0010 
11110010 

11010010 
11010010 
11010010 

11010010 

11110010 
11110810 
00000001 
11110110 
11110111 
11110001 
10110010 
10010010 
10110010 
10010010 
11110801 
11000000 
11110111 
11110111 
11110010 

10180010 
10100018 
10100010 
10100010 
10108010 
U080800 
11110001 
11110118 
00008001 

11110001 
01000011 
00088111 
11011100 
11111811 
00000180 
11011111 
11100000 
11118100 
11008000 
11118101 
08100001 

11110001 



OOTR 
OORR 

DORR 

SHIFT 
SHIFT 
OORR 

RPT 

SHIFT 

SHIFT 

SHIFT 

SHIFT 

OORR 

OOTI 
OORR 

LOTR 

CCLR 

SHIFT 

CCLR 

SHIFT 

UORT 

OOTI 

OORR 

LOTR 

RPT 

SHIFT 

SHIFT 

SHIFT 

SHIFT 

SHIFT 

OOTI 

DORR 

RSETRDY LOTI 
RPUTRBS LORT 
RPUTDAT MWAIT 



,AC»TEMP1, ,C8 
TEMPl f XR, TEMPI, ,CC 

TEMP2,FT,Q,,CF+SR 

SR,CF 
SR,CF 
TEMP2,XR,T£MP2 

4 

SR,CF 
SR,CF 
SR,CF 
SR#CF 
TEMP2,XR,TEMP2 

,NO»l 
RCRCU#XR,RCRCH 

TEMPI 

SR 

SR 

TEMPI 

,NO#0300 

RCRCL,XR,RCRCL 

TEMP2 

5 

SL 

SL 

SL 

SL 

SL 

«NOf 0300 

RCRCH.XR, TEMPI 

1 

BSTAT 
,CMEMPK 



SL (LSB-01 

TEMPI, XR»T*>TEMP1 (LINK»05 

SR->TEMP2 

SR 
SR 

TEMP2,XR f T-»TEMP2 



SR BY 4 
SR BY 4 
SR BY 4 
SR BY 4 
TEMP2,XR,Tp>TEMP2 



CRCH,XR,T->CRCL 

LSB«>LINK 

SRC 

LSB«>LINK 

SRC 

T*»TEMP1 

CRCL,XR.T->CRCL 
TEMP2»>T 

SL BY 5 
SL BY 5 
SL BY 5 
SL BY 5 
SL BY 5 

TEMPI. XR f T*>CRCH 

ROY FOR BSTAT 



OOPIP M00W,ND,-1«SWUSER,PSWI MAKE SURE WE CAN USE THE MEMQRY1 



LOPI 


MAR0H f RBUF>8 


POINT TO NEXT 


LOPR 


MAROLiRPNTR 




LOPR 


MDW,ROATA 


WRITE THE DATA 


LOTR 


BSTAT 


GET THE STATUS 
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9! 5'. 



916. 
917. 

9181 
919' 
920, 

9221 
923. 
924*. 
9251 
926. 
927*. 



928, 

w K 9r ■ 

930, 
931*; 
932. 
9331 

If *5# * 



935" 
936, 
937. 

938*. 

939; 

940 

941. 

942'. 

943* 
944J 
945, 

946. 

947' 

948, 
949; 

950. 



951* 
952, 
953. 

954* 
955. 



COMM/TXT 
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007310L 
007311L 
007312L 
007313U 
007314L 
007315L 
007316L 

007317L 
007320L 
007321L 
007322U 
007323L 
007324L 
007325L 
007326L 
007327L 
007330L 

007331L 
007332L 
007333L 
007334L, 

007335L 

007336L 
007337L 
007340L 
007341U 
007342L 
007343L 
007344L 

007345U 
007346U 

007347L 
007350L 

007351L 
007352L 
007353L 
007354L 
007355U 
007356U 

007357L 
007360L 
007361L 
007362L 
007363L 
007364L 
007365L 
007366L 
007367U 



11000100 
11010111 
00110111 
00110111 
0011000! 
01101110 
11011111 

01110001 
00010111 
01101111 
01000000 
11010010 
01110001 
01010000 
11010010 
01101111 
11011111 

01000101 
11000010 

01010011 
01101111 
11001111 

01010001 
01101111 

01110001 
01110000 
01 110011 

11000010 
0101000! 
01101111 
01110001 
01010101 
11000010 
01010001 
01101111 
01010001 
0110111! 
01101111 

1100111! 

01010101 

0110111! 
01000101 
11000010 
01110001 
01000000 
11000010 
01110001 
01010011 



00110111 
00000111 
00001100 
00100001 
10010000 
01110100 
00000011 

11110111 

10010010 

11110111 

00110010 

00000011 

11110101 
00110010 

000000U 

11110011 

11100110 

00001000 
00100001 
00001000 
11110011 
01101100 

10000001 
11110001 
11110101 
11110111 

11110110 

00011001 

11000001 
11110001 
11110011 

00010000 

00010101 

00000100 
11110011 
00000000 
11110111 
11110110 
01000011 

mum 
11110011 

00001000 
00000101 

11110101 
00000010 
01111101 

11110011 
00001000 



MWAIT ,CMEMPK 



STB 

LOPT 

LOTP 

INCR 

BRA 

RSYNUOP LOTR 
SHIFT 
LORT 
TSTIT 
BRA 
TSTIR 

BRA 

LORT 

BRA 

CHKCRC TSTIT 
BRA 
DORI 

BRA 

CHKCRCl IDRI 

DOTRR 

OOTR 

BRA 

LORI 



IMAR 

MOW 

MARIL 

RPNTR 

CRETURN 

RtHTA2 

SR 

RDATA2 

XR,SYN 

CRETURN, FZ 

XR,SYN,RDATA,,TW 

CRETURN, FZ 
RSTAT 

RSYN 

,CRC 

CHKCRCl, FZ 
RSTAT, OR, CRC 

DORCRC 

8STAT,0201 

,XR,RCRCL,RDATA 

,OR,RCRCH 

CHKCRC2,FZ 

BSTAT,0301 



CHKCRC2 OOTIR , ND.BIP. RSTAT 



BRA 
LOTI 
CHKCRC3 LORT 
LORI 

LORT 
BRA 

RLOLE OORI 

TSTIT 

BRA 

TSTIR 

BRA 

DORIR 



CHKCRC3,FZ 
SYNWAIT 
RSTAT 
RCRCL#0 

RCRCH 
RPUTOAT 

RSTAT, NO, *l*LOLE 

,XPAR 

RXLOLF,FZ 

XR,STX,RDATA 

RCHKOLE,FZ 

RSTAT, OR, XPAR, RSTAT 



POINT TO STATUS 
WRITE THE STATUS 
GET THE POINTER 
AND BUMP IT 



GET LAST BYTE 

SHIFT IN LSB JUST SHIFTEO OUT OF ROATA 

AND PUT IT BACK 
WAS LAST BYTE A SYN? 

NO, KEEP WAITING 
IS CURRENT BYTE A SYN? 

NO, KEEP WAITING 
YES! ZERO RSTAT 



ALREADY HAVE FIRST CRC? 

NO, BUT WE DO NOW! 

ROY AND EOB 
COATA.XR,CRCL)+CRCH.0? 

ROY, EOB, OK IF ALL IS COOL 
CLR ALL BUT BIP 

IF BIP IS SET LEAVE IT ALONE 
ELSE CLR ALL, SET SYNWAIT 

CLR CRC 



RESET LOLE 

OLE*STX? 

SET XPAR IF SO 
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956. 
957* 
958. 



959'. 

960'. 

96 r. 



962. 

9631 

964'. 

965' 
966. 

967* 
968. 
969* 
978, 

971; 

972, 
973, 
974. 



975. 
976*. 
977; 
978. 



9791 
980, 
981*. 

9821 
983, 
984, 
985. 

988*. 
987'. 

988'. 

989' 
990. 
991'. 



0073701 011011H 11110011 
007371L 11011111 11100010 



0073721 
007373L 
007374L 
007375L 
0073781 
007377L. 
007400L 
007401U 
007402L 
007403L 

007404L 
007405L 
007406L 
0074071 
007410L 
007411L 
007412L 
007413L 
007414L 
007415U 
007416U 
007417L 
00742PIL 

007421L 
007422L 
007423L 
007424L 

007425L 
007426L 
007427L 
007430L 

007431L 
007432L 
007433U 
007434L 

007435L 
007436L 
007437L 
007440L 
007441L 
007442L 
007443L 
007444U 
007445L 



01110001 
01000000 
11010011 
11000100 
11010111 
001100101 
01010101 
00110111 
01010001 
00110111 
01110001 
00110111 
01010001 
00110111 
01010001 
11010100 
11010111 
00110UI 
00110111 
00110001 
01101110 
01110001 
11001111 

01110001 
01000101 
11010010 
11001111 

01110001 
01010011 
01101111 
11001111 

01110001 

01000101 

11010010 

11001111 

01110001 
01000101 
11000010 
01010011 
01101111 
01010001 
01101111 
01101111 
11001111 



11110101 
00110010 
11101110 

00000010 

00000111 

11011100 
11111011 

00000100 
11011111 
11100000 
1U10100 
11000000 
00010000 
00100001 
00000001 
11110110 
00000111 
00001100 
00100001 
10010000 
01110100 
11110101 
01111010 

11111001 
00001000 
000000U 
00000010 

11110011 
00000010 
11110011 
01101100 

11111001 
00001000 
00000011 
01000101 

11110011 
00010000 
01101100 
00010000 
11110011 
00000000 
11110111 
UU0110 
01000101 



BRA 

RXUDLE TSTIR 

BRA 
RPUTOLE MWAIT 



ROLE 



RSYN 



RSOB 



RSOB 

XR,SYN # ROATA 

ROLESYN,TZ 
,CMEMPK 



OLE-SYN? 



OOPIP MODW,ND,-!*SWUSER#PSWt MAKE SURE WE CAN USE THE MEMORY! 



ELSE STUFF OLE IN BUFFER 



LOPI 


MAR0H,RBUF>8 


LOPR 


MAROLiRPNTR 


LOPI 


MOW.OLE 


LOTI 

MWAIT 


1 
,CMEMPK 


STB 

LOPT 

LDTP 

INCR 

LOTR 

BRA 


IMAR 

MOW 

MARIL 

RPNTR 

ROATA 

RCHKSYN 


TSTIR 


.SYNOELiCOMM 


BRA 
BRA 


CRETURN.FZ 
RPUTOLE 



SET UP ROY STATUS 



POINT TO STATUS 
WRITE THE STATUS 
GET THE POINTER 
AND BUMP IT 



OORIR RSTAT,OR,LOLE,RSTAT SET LOLE 



STRIP SYN? 



BRA 


DORCRC 


TSTIR 


iSYNQELtCQMMODE 


BRA 
BRA 


CRETURN,FZ 
RSETRDY 


TSTIR 


,BIP,RSTAT 


BRA 
OORI 


DORCRC, FZ 
RSTAT,OR,BIP 


L»RI 


RCRCLi0 


LORT 
BRA 


RCRCH 
RSETRDY 



BLOCK ALREADY IN PROGRESS? 

IT IS NOWi 
CLR CRC 
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993. 
994*. 



995. 
996* 
997. 



998' 
999, 

1000' 
10011 

1002!, 

1003. 



1004' 
1005. 



007446L 
007447L 
007450L 
007451L 
007452L 
007453L 
007454L 
007455L 

007456L 
007457L 
007480L 
007461L 

007462L 
007463L 
007464U 
007*65L 
007468L 
007467L 
007470L 



01110001 
01010101 

01101111 
01110001 
01010101 
01010011 

81101111 
110W1U1 

01010001 

01101111 
01010001 
1100UU 

01110001 

01000000 
11000010 
01110001 
01010011 
01101111 
11011111 



11110011 

1110UU 
11U00U 
UU00H 
11110111 

00000001 

U110011 

01101100 

00000100 

11110011 
10000001 
01000100 

11110101 
000J0000 

0110110B 
11110011 
00000010 
11110011 

00000011 



REOB 



RE081 



OORIR RSTAT,ND,*1-8IP,RSTAT CLR BIP 



RENO 



DOTIR ,ND,«i^ypAR,RSTAT 

OORI RSTAT,OP,EQB 

BRA OORCRC 

LORI RSTAT#SYNWAIT 

LOTI 0201 

8RA RPUTRBS 

CHKXDLE TSTIR XR,DLE,RDATA 

BRA OORCRC, FZ 

OORIR RSTAT,OR,LDLE#RST4T 

BRA CRETURN 



CLR XPAR 
SET EOB 



ROY AND EOB FOR BSTAT 



IS THIS A OLE? 

NO 

YES, REMEMBER IT1 
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COMM/TXT 




MICROPROCESSOR 
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GENSYNC 


RCVR 






1008'. 








* 








1009' 








, RSTAT 


USAGE 






1010, 








• 




0,1 ... 




1011, 








• 




j> ... SVNWATT 




1012, 








§ 




3#4 *— 




1013, 








• 




5,6,7 f— BCOUNT (BITS PER CHARACTER) 


1014^ 








• 








1015. 








» RBUF 


STAT 






1016. 








• 




?! ... RDY (PRECEDING BYTE" JN "RECEIVED DATA} 


1017'. 








• 


1,2,3,4, 


5,6,7 »»•» 




1019. 








• 








007471L 


01110001 


11110011 


GSR 


TSTIR 


, SVNWAIT, RSTAT, ,TW 


WAITING FOR SYNwSYN? 




0074721 


01010101 


00000100 










1020], 
1021, 


007473L 


11010011 


10101011 




BRA 


GSR1,TZ 


THEN DON'T BOTHER WITH EXTENDE 
















1022, 


007474L 


01H0001 


10U0111 




LDTR 


RDATA2,CC 


ELSE GET LAST BYTE C0->LINK) 


1023, 


0G7475L 


00010111 


10010010 




SHIFT 


SR 


SHIFT RIGHT WITH ZERO FILL 


1024, 


007476U 


01101111 


11110111 




LORT 


RDATA2 


AND PUT IT BACK 


1025. 


0074771. 
007500L 


01110001 
01010101 


11111001 
11100000 




OOTIR 


,ND, WLNGTH, COMMODE 


GET WLNGTH IN 3 MSB 


10261 


007501L 


00010111 


10100010 




SHIFT 


SL 


AND MOVE. IT,., 


1027, 


007502L 


00010111 


10100010 




SHIFT 


SL 


...TO 3,,, 


10281 


007503L 


000101 11 


10100010 




SHIFT 


SL 


• • .LSB 


1029'. 


007504U 
007505L 


01010100 
01101111 


010100U 

101 10000 




OORI 


LTNK,SB.68RTAPlM,,eC 


SET UP BASED JUMP IN LINK 


1030'. 


007506L 
007507L 


01110001 
01110100 


H110101 

11U0101 




OOTRR 


,SB,RDATA,RDATA 


RDATA LSB->LINK 0*>T 


10311 


007510L 


00010111 


10010010 




SHIFT 


SR 


RDATA LSB«>MSB OF ZERO BYTE 


1032 
1033, 


007511L 


01011001 


11110000 




BPGX 


S 




007512L 


11101111 


00000000 




BRR 


LINK 


DO 0*7 SR'S 


1034, 


007513L 


000101111 


10010010 




SHIFT 


SR 


(1 BIT WORDS) 


10351 


007514L 


00010111 


10010010 




SHIFT 


SR 


C2 n ■ ) 


1036' 


007515L 


00010111 


10010010 




SHIFT 


SR 


(3 ■ » ) 


10371 


0075161 


00010111 


10010010 




SHIFT 


SR 


(4 ■ » ) 


1038* 
1039, 
1040, 
1041. 


007517U 


00010111 


10010010 




SHIFT 


SR 


C5 « « ) 


007520U 


000101H 


10010010 




SHIFT 


SR 


(6 ■ " ) 


007521L 


00010111 


10010010 




SHIFT 


SR 


(7 " » ) 


0075221 


011100U 


11110111 


G8RTAP1 


DORR 


RDATA2,0R,RDATA2 


SHIFT RDATA LSB INTO RDATA2 MSB 




0B7523L 


01101111 


11110111 










10421 


007524L 


01010001 


00000000 


GSR1 


LOTI 





GET READY TO ZERO LINK 


10431 


007525L 


01110001 


10110101 




LOTR 


RDATA,CC 


GET CURRENT BYTE C0->LINK) 


1044, 


007526L 


00010111 


10010010 




SHIFT 


SR 


SHIFT RIGHT WITH ZERO FILL 


1045, 


007527L 


01101111 


11110101 




LORT 


RDATA 


AND PUT IT BACK 


1046. 


007530L 
007531L 


01110001 
01010101 


11111001 
11100000 




OOTIR 


,ND, WLNGTH, CQMMODE 


GET WLNGTH IN 3 MSB... 


1047' 


007532L 


00010111 


10100010 




SHIFT 


SL 


,,,AND MOVE,.. 


1048, 


007533U 


00010111 


10100010 




SHIFT 


SL 


,.^TO 3.., 


1049, 


007534L 


00010111 


10100010 




SHIFT 


SL 


• , .LSB 


1050. 


007535L 
007536L 


01010100 
0U01111 


0110H01 
11110000 




OORI 


LINK,SB,GSRTAP+1 


SET UP BASED JUMP IN LINK 


105ll 


007537L 


00110001 


00010110 




LDTP 


SDLCIN 




10521 


007540U 


00010111 


10110010 




CCLR 




NEW BIT m> LINK 
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10531 
1054, 
1055, 
1056' 
1057, 
10581 
1059, 
1050, 
1051, 
10521 
1063* 
1064. 

1065'. 



1066' 
1067, 
1068. 
10691 
1070' 

10*U 
10721 

1073' 

10741 

1075' 
1076. 
1077*. 

1078' 
1079 

1080, 
1081. 

10821 
1083. 
10841 
1085. 

10861 



COMM/TXT 
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007541L 
007542L 
0075431 
0075441 
0075451 
007546L 
007547L 
007550L 
0075511. 
007552L 
007553L 
007554L 
007555L 
007936L 
007557U 
007560L 
00756R 
0075621 
007563L 
007564L 
0«7565L 

007566L 
0075671 
007570L 
007571L 
0&7572L 
007573L 

007574L 
007575L 
007576L 
007577L 

007600L 
007601L 
007602L 
0076031 
007604U 

007605L 



01010001 
00010111 
01011001 
11101111 
00010111 
00010111 
00010U1 

00010111 
00010111 
00010111 
00010111 
0U10011 

0U01U1 
01110001 

01010^10 

01101111 

01000101 

11010010 

01000101 
11010010 
11010000 

01110001 
01010101 
01101111 
01110001 

01U0000 

11000010 

011100101 
01000101 
11010010 
11001111 

01110001 
01110000 
11010010 
01110000 
11010010 
11011111 



00000000 
10010010 
11110000 
00000000 
10010010 

10010010 
10010010 

10010010 
10010010 

10010010 
10010010 
11110101 
11110101 
10110011 
00100000 
11110011 
00000001 
01101110 
00000100 

01111111 
00000011 

11111001 
1110000^ 
11110011 
11110101 
11001110 

01000101 

11111001 
00001000 
00000011 
01000101 

1 1 1 It 110 

11000111 
000000U 
11000101 
00000011 
10001001 



GSRTAP 



GSR2 



LOTI 

SHIFT SR 

BPGX $ 

BRR LINK 

SHIFT SR 

SHIFT SR 

SHIFT SR 

SHIFT SR 

SHIFT SR 

SHIFT SR 

SHIFT SR 

OORR RDATA,OR,ROATA 



NEW 8IT»>MSB OF ZERO BYTE 

DO 0-7 SR'S 

(1 BIT WORDS) 

C2 BIT WORDS) 

(3 BIT WORDS) 

(4 BIT WORDS) 

(5 BIT WORDS) 

(6 BIT WORDS) 

(7 BIT WORDS) 
SHIFT NEW BIT INTO ROATA MSB 



DORIR RSTAT, AC, BCOUNT, RSTAT, CC 



BUMP THE BIT COUNT 



TSTIT ,CIP 

BRA ARBCCHK.FZ 

TSTIT ,8YNWAIT 

BRA GSYNLOP,FZ 

BRA CRETURN.FC 

DOTIR ,ND,WLNGTH, COMMODE 

LORT RSTAT 

TSTRR XR,SYNCOOE,RDATA 

BRA RSETRDY,FZ 

TSTIR ,SYNDEL»CQMMODE 

BRA CRETURN,FZ 

BRA RSETRDY 



GSYNLOP TSTRR XR,RDAT A2, SYNCODE 



BRA 
TSTTR 
BRA 
BRA 



CRETURN f FZ 
XR,RDATA 
CRETURN,FZ 
GSR2 



ALWAYS IF GENSYNC, 1 IF ASYNC 
THIS WILL GO TO ASYNC CODE 

GO LOOK FOR SYN-SYN 

RETURN IF NOT DONE WITH BYTE 

GET THE WORD LENGTH 

AND PUT IT IN RSTAT CRESETS SYNWAIT) 
DID WE GET A SYNCODE? 

GO STUFF BUFF IF NOT 

ARE WE STRIPING? 

YES, JUST RETURN 
NO, STUFF THE BUFF 

WAS LAST BYTE A SYN? 

NO, KEEP WAITING 
IS CURRENT BYTE A SYN? 

NO, KEEP WAITING 
YESi 
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1089, 

1090" 

1091 
1092, 

1093, 
1094. 
1095. 

i09e; 

1097. 
1098. 
1099' 
U00. 
1101. 
1102'. 
11031 
1104, 
1105. 

11061 
1107*, 
11»8. 



1109' 
1110. 
HllJ 
1112. 
1113". 
11 Ml 

ins; 

1116, 
1117. 

nisi 

1H9, 
1120, 
1121, 

* 4 ft ** • 

1123. 



112^1 
11251 

1126, 
1127, 

1128. 

11291 
1130, 
1131. 

H32*, 
1133. 



007806L 

007607L 
0W7810L 

007811L 

007612L 

0076131, 
0076141 
007615L 
007616L 
007617U 

807620L 



0076211 
007822L 
0076231. 
007824U 
007625L 

0C7626L 
007827L 
007630U 
007631L 
007632L 
007633L 
007634L 
007635L 
0W7836L 
007637L 
0078401 
007641L 

007642L 
007643L 
007644U 
007645L, 



01110001 

11010011 

01010100 

01101111 
11011111 

01110001 
01000101 

110108)11 
01000101 
11010010 
11011111 



11010000 
01010001 
01101111 
01110001 
11011111 

01000101 
11010011 
01110001 
0101010* 
01181111 
11010011 
00110001 
01000101 

11810*11 

01010001 
01101111 
11011111 

01010001 
01101111 
00110001 
01000101 



10110110 
01119)100 
00000001 

11110110 

$000001 1 

11110011 
00000001 
01101001 
00001000 
01011101 
10101011 



01101011 
00001801 
11110011 
10111H0 
01110111 

00000010 
01010110 
10110111 
00008001 
11110111 
01001011 
00010110 
00000081 
08000011 
00000080 
11110011 
00080811 

00000000 

11118811 

00010110 

00800001 



RSTAT USAGE 



R8UF STATUS 



t 
t 
« 
» 

• 

ASR LOTR 
ACHKIC 8RA 
DECRIC OORI 

BRA 

ACHKCIP TSTIR 

BRA 
TSTIT 

KjJPf A 

BRA 





1 

2 
3 

4 






5,6,7 »-* 



-— 
1 , 2, 3, 4, 5,6 «■-«* 
7 



CIP (CHARACTER IN PROGRESS) 

SIP CSTART ELEMENT IN PROGRESS) 

8 

CHRCOM (CHARACTER COMPLETE) 



BCOUNT (BITS PER CHARACTER) 



ROY (PRECEDING CHARACTER TS RECEIVED DATA) 



FRAMING ERROR 



R!COUNT,CC 
ACHKCIP, TZ 
RICOUNT,SB,i 

CRETURN 

, CIP, RSTAT 

ACHKSRT.TZ 
,CHRCOM 
ACHKSTP.FZ 
GSR1 



GET INTRP CNT 

CHECK FOR CHARACTER IN PROGRESS IF IC«8 

DECREMENT THE ICOUNT 



CHARACTER IN PROGRESS? 

CHECK FOR START ELEMENT IF NOT 
CHARACTER COMPLETE? 
CHECK FOR STOP ELEMENT IF SO 
GO DO COMMON STUFF IF NOT 



. GSR WILL RETURN HERE AFTER BUMPING THE BIT COUNT 



ARBCCHK BRA 
LORI 

AREXIT LOTR 
BRA 

ACHKSRT TSTIT 
BRA 
DORIR 



BRA 

LOTP 

TSTIT 

BRA 

LDRI 

BRA 

ACHKSTP LORI 

LOTP 
TSTIT 



AREXIT.FC 
RSTAT, CHRCOM+CIP 

AIST0R,CC 
DECRIC 



JUMP IF CHARACTER NOT COMPLETE 
SET CHRCOM 

INIT NUMBER OF INTERUPTS PER BIT 



,SIP 

ACHKSP,TZ 

SPCOUNT,SB,l,SPCOUNT,CC DECREMENT THE SPACE COUNT 



START ELEMENT IN PROGRESS? 
CHECK FOR SPACE IF NOT 



GOTSRT,TZ 

SDLCIN 

,1 

CRETURN, TZ 
RSTAT, 

CRETURN 

RSTAT, 8 

SDLCIN 
,1 



GOT A START IF SPACE C0UNTb8 
GET THE NEW BIT 
LOOK AT LS8 
RETURN IF SPACE 
CLEAR START IN PROGRESS IF NOT 



GET THE NEW BIT 
LOOK AT LSB 
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H34, 
1135. 
U36; 

1137. 
1138*. 
1139*. 
U4Q f 
1141. 

U42l 

U43; 

1144. 

IMS'. 
U46l 
1147. 

1148*. 

1149'. 



11501 
1151. 



COMM/TXT 



OATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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007646L 
007647L 
007850L 

007651L 
007652L 
007653L 
007554L 
007655L 
007656L 
007657L 
007660L 
007661L 
007662L 
007863L 

007664L 
007665L 
007665L 
007667L 
007670L 
09767a 
007572L 
007673L 



11000010 

01010001 
11001111 

00110001 
01000101 
11010010 
01010001 
01101111 
01110001 
01010010 
00010111 
01010101 
01101111 
11011111 

01110001 
01010101 
01010011 
01101U! 

01110001 
01010J00 

01101111 
11011111 



01000101 

10000001 
01000100 

00010110 
00000001 
00000011 
00000010 
11110011 
10111110 
00000001 
10010010 
01111111 
11110111 
00000011 

11111001 
11100000 

00000001 
11110011 
10111110 
00000001 
11110110 
01111000 
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BRA 

LOTI 

BRA 

ACHKSP LOTP 
TSTIT 
BRA 
LORI 



SHIFT 
OORI 

BRA 

GOTSRT OOTIR 

OORI 

OORIR 

BRA 



RSETROY,FZ 

0201 

RPUTRBS 

SDLCIN 

fl 

CRETURN,FZ 
R8TAT»SIP 



OOTIR ,AC# l#AISTOR»CC 



ALL IS COOL IF MARK 
ROY & FRAMING ERROR 



GET THE NE* BIT 
LOOK AT LS8 
IGNORE IF MARK 
SET START IN PROGRESS IF SPACE 

INIT SPCOUNT FOR 1/2 BIT 



SR 

SPCOUNT, Np,0177 

CRETURN 

f Np,wiNGTH,COMMOOE 
RSTAT,OR#CIP 
RIC0UNT,SB,1,AI8T0R,CC 

ACHKIC 



" (FIX UP LINK SCREW UP) 

GET WORO LENGTH 
SET CHARACTER IN PROGRESS 
INIT INTERUPTS PER BIT 

CHECK ICOUNT FOR 
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1154. 

1155, 

1158. 

1157; 

1158'. 

1159. 

11801 

11811 

U62. 

1183*. 

11841 

11651 

11661 

11671 

U68, 

1169, 

11701 

HTll 

11721 

11731 

1174'. 

11751 

11761 

1177, 

1178, 

1179. 

1180* 

1181. 

1182. 

1183, 

1184. 

1185. 

1186* 

1187. 

1188 

11891 

1190* 
11911 

11921 



11931 
H94l 
1195. 

1196*. 

1197; 
1198. 
11991 



0076741 



* 
SIIN8 



007674L 
007675L 
007676L 
007677L 
007700L 
007701L 
0077021 
007703L 
007704L 
007705L 
007706L 
007707L 
007710L 
007711L 
007712L 



00110001 
01000101 
11010010 
01010001 
00110111 

01110001 

01010011 
00110111 
00110111 
11001110 
11010100 
11010111 
00110001 
00110111 
11010011 



( 163) SUN 
C062 163} SIMIN 



MOVE ONE BYTE FROM RCV BUFFER TO (A) * 
MOVE C BYTES FROM RCV BUFFER TO (HL) ** 
* 7,8/5,75 

** 4.7/7.75/5,05 +7.4N FOR NRML/MT/E08 
SETS TZ IF BUFFER EMPTY 

TS IF EOB (FRAMING ERROR IN A$YNC) 
TP IF EOB ANO GOOD CRC 



SII 



SIMIN 



IF USER THEN IVIQL 

ELSE MAR <- RBUF,URPNTR+1 

LUF <- (MAR) 
IF TZ THEN SIIEXIT 
ELSE (MAR) «* 

URPNTR <i.URPNTR + 2 

MAR <» MAR»t 

IF (062 163) THEN SIMIN 

ELSE URA <* (MAR) 
END 
ENO 

MRO *m (MAR) 

MAR <m HL 

HL «* HL*1 

(HL) <- MOR 

URC < URC-1 

IF TZ THEN SIIEXIT 

ELSE IF TS IN UCFLG THEN SIIEXIT 
ELSE IF SRVREO THEN SRVRPT 
ELSE SII 



11011100 

00000100 
00000001 

11011111 

1 1100000 
11111010 

00080001 
11000080 
*!00011l 
11111111 
00111801 

00000101 
00110110 
00000110 
00001100 



SIIEXIT: PSW <- PSW.AND.-t-SWRPT 
END 

TSTIP ,5WUSER»P8WI 



SII 



8RA CIVIOL,FZ 
LOPI MAROH,RBUF>8 

OOPIR MAROL,OR,l, URPNTR 



USER MODE? 

USERS CAN»T DO THISJ 
CHECK RBUF FOR DATA 



007713L 01010001 00000000 



STB 

NOOP 

MWAIT 


SMR 
,CMEMPF 


LOPP 


LUF,MDR 


BRA 


8IIEXIT#TZ 


LOPI 


MDW,0 



(800) 



SET FLAGS FROM RBUF STAT 
DO NO MORE IF BUFF MT 
ELSE MARK LOCATION MT 
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1200. 



1201. 

1202*. 

1283; 

12**1 
1205. 

12»6' 
1207 f 

12518. 

1209'. 

1210^ 
1211. 

1212*. 



1213*. 
12 Ml 



12151 

12161 
12171 

12181 
1219. 
12201 
122i' 
1222. 
1223'. 

12241 
1225*. 
1226. 

12271 
12281 



1229*. 
1230*. 



007714L 
0077151 
007716L 
0077171 
007720L 
0077211 
007723L 

007723L 
007724L 
007725L 
007726L 
007727L 

007730L 

007731L 

>007732L 

>007733L 

007734L 
007735L 
007736L 
007737U 
007740L 
007741L 
007742L 
007743L 
007744L 
007745L 
007746L 
007747L 
007750L 

007751L 
007752U 
007753L 



001101H 
01110001 
01010010 
(31101111 
11010100 
11010111 
00110111 
00110111 
11001110 
11010100 
11010111 
11011000 

00110001 
00110111 
01011001 
11001111 



0011 
0011 
0011 
0001 
0011 
0011 

0011 
0011 
0011 

0011 
0101 
0011 
1101 



0001 

0001 
0001 
0110 
0111 
0001 
0110 
0001 
0111 
0001 
0100 
0111 

0011 



00110001 
01000101 
11010010 



00100001 
10111010 
00000010 
HU1010 
00101111 
00000101 
00001101 
01000111 
11111111 
00101010 
00000101 
00100011 

00110110 
10000000 
11111111 

lltlllli 

11000110 
11100101 
10010000 
01110010 
10000110 
10110000 
10000101 
00110110 
00100001 
11010010 
00000001 
10000010 
00001 100 

00110101 
010000910 
1*0001108 



007754L 00110001 00110000 
007755L 11010010 00001110 



307756L 
007757L 
0077801 



11010100 
11010111 
11011111 



00010001 
00000101 
01000000 



>007761U 01011001 llllltll 
>007762L 11001111 ltilllll 



007763U 

007764L 

007765L 

>007766L 

>007767L 



00110001 

01010101 

00110111 
01011001 
11001111 



11011100 
11011111 
10001100 
11111111 
11111111 



OORIR URPNTR,AC,2,URPNTR,CC INC USER BUFF POINTER BY g 



MWAIT »CMEMPF 



C600) 



STB 
ST8 
NOOP 
MWAIT 


OMAR 
SMR 

,CM£MPF 


BRA 


SIMIN,F0,JZ 


LOPP 


URO+URA.MDR 


BRAX 


FETCH 



GET DATA FROM BUFFER 



(800) 



Sill 



SIMIN DLOX HL2MR 

DADDP U»0+UR,MARI 



AND PUT IT IN A 

AND THAT'S ITJ 

AND POINT TO CHL) 

INC HL 



J.OPP M0W,M0R MOVE DATA FROM BUFFER TO (HD 

DOPIP UPQ*URC»SB,i#URI+URC DEC C 



BRA 
TSTIP 

™*t A 

IOTP 
BRA 

MWAIT 

BRA 

8IISRV BRAX 



SIIEXIT,TZ 

# 0100,UCFLG 

SIIEXIT,FZ 

SRVREQ 
SIISRV,FZ 

,CMEMPF 

SII 

SRVRPT 



QUIT IF IT'S NOW 

CHECK FLAGS FOR EOB 

QUIT IF EOB 

CHECK FOR SERVICE REQUEST 
HANDLE IT IF IT'S THERE 

AND DO IT AGAIN 



SIIEXIT DOPIP PSW0,ND,-1-SWRPT,PSWI CLEAR THE REPEAT FLAG 



BRAX 



FETCHW 
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1233. 
1234. 
12351 
1236, 
1237. 

12381 
1239. 



12*0, 



1248 
1243. 



1244 
12451 

1246. 
1247" 

1248. 



007770L 01010001 000000P0 
00777JL 01101111 U111001 



>007772L 01011001 11111 
>007773L 11001111 11111 



>007774L 

>007775L 



01011001 

11001111 



litlt 

11111 



>007776L 01011001 11111 
>007777L 11001H1 lilll 

801000 

007000 

007000 



PAD 


i-S-0l0 t AND,0377 


.CMEMPK 




LDRI 


COMMODE.0 


.CMEMPF 




BRAX 


MFMPFS 


.CRETURN 




BRAX 


SRVNXT 


.civiou 




BRAX 


IVIOLS 


CDORLEN EQU 


iwCOORP 


USE 


CDQRL 


SKIP 


CDORLEN 


END 





TURN COMM OFF IF MEMPF 
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COMH/TXT 




MICRO* 


PROCESSOR 


COMUNICATIONS 


SUPPORT 


m JAM 


000177 


ABORT 


♦ 149 


820 
















AC 


194 


206 


287 


315 


447 


499 


506 


509 






815 


858 


883 


1065 


1142 


1200 






010017 


ACCTL 


*77IA 
















010015 


ACD 


*74»A 
















007613 


ACHKCIP 


♦ 1108 


1104 














m?m7 


ACHKIC 


*1104 


1150 














007651 


ACHKSP 


*U38 


1122 














007626 


ACHKSRT 


*U21 


1109 














007642 


ACHKSTP 


♦ 1131 


1111 














010017 


ACPH 


♦ 76IA 
















010016 


ACPt 

ACUIN 

ACUOT 


*75tA 

669 
671 
















000010 


AOOOET 


*99 


792 














030016 


AISTOR 


*82 


476 


506 


509 


511 


1118 


1142 


1149 


000001 


APF 


*9IA 


120: A 














010014 


APFRK 


• 68JA 
















010013 


APFRP 


*67IA 
















010016 


APFTK 


♦ 70IA 
















010015 


APFTP 


*69f A 
















007621 


ARBCCHK 


♦ 1116 


1067 














007624 


AREXIT 


*1118 


1116 














006475 


ASETIC 


♦ 476 


497 


503 


514 










007606 


A8R 


*1103 


722 














006462 


ASX 


♦ 468 


170 














006506 


AX8IT 


*483 


487 














006524 


AXCIP 


*499 


473 














006512 


AXIOLE 


*4B9 


471 














006515 


AXIDLEi 


*492 


489 


490 












006510 


AXSP 


♦ 486 


481 














006521 


AXSTRT 

B0 

81 

82 

B3 

B4 

B5 

B6 


♦ 496 
104 
106 
108 
1*9 
111 
113 
123IA 


492 
118 

122 














007141 


BADCRC 


♦821 


827 


829 












000040 


BCOUNT 


♦ 113 


206 


287 


447 


499 


787 


858 


1065 


000020 


BIP 


♦ 111. 


112 


386 


394 


401 


407 


409 


942 


020006 


BR 


*42!A 
















007*62 


BSCR 


♦ 852 


724 














006150 


B8CX 


*207 


172 














030001 


B8TAT 


*72 


908 


914 


937 


941 










C0 


315 


5B6 


3U 


567 


683 


883 








CI 


264 


364 


373 


365 


585 


919 


970 


1212 


000 100 


CAP55I0 


*123IA 


126IA 














000115 


CAPABILI 


* 1261 A 
















000110 


CAPAPF 


♦120IA 


126IA 














0§0i®4 


CAPBUUE 


♦119JA 


126IA 















78JUL20 11*44 



511 



576 



692 



787 



985 



987 



992 
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00 1200 


CAPCOM 


♦124IA 


126SA 






















00 !i§0 


CAPCVNT 


M21IA 


126:A 






















00 li«0 


CAPGUPY 


♦ 118M 


126IA 






















00l«01 


CAPMICR 


♦117IA 


126IA 






















00i§00 


CAPRIM 


♦122IA 


126IA 
























CC 


191 


203 


204 


206 


223 


229 


232 


287 


316 


327 


328 


329 






330 


336 


375 


376 


447 


468 


477 


509 


510 


575 


588 


688 






691 


752 


765 


775 


781 


784 


787 


813 


853 


854 


884 


895 






896 


897 


898 


904 


923 


1022 


1023 


1026 


1027 


1028 


1029 


1031 






1034 


1035 


1036 


1037 


1038 


1039 


1040 


1043 


1044 


1047 


1048 


1049 






1052 


1054 


1057 


1058 


1059 


1060 


1061 


1062 


1063 


1065 


1103 


1118 






1123 


1142 


1143 


1149 


1200 
















00? 000 


COOR 


♦134IA 


712 






















0«)000 


COQRL 


♦ 714 


716 






















0«|00* 


COQRLEN 


*1245 


1247 






















107000 


COORP 


♦ 716 


1245 






















106000 


coox 


♦133SA 


161 






















106000 


COOXL 


♦ 163 


165 






















111000 


COOXUEN 


♦ 705 


707 






















^16000 


cnoxp 


♦ 165 


705 
























CF 


169 


193 


194 


195 


198 


202 


205 


206 


208 


216 


218 


220 






221 


(ftiC <K 


226 


227 


228 


230 


231 


233 


235 


239 


240 


243 






245 


247 


249 


250 


255 


256 


257 


260 


262 


263 


267 


287 






293 


295 


299 


311 


312 


314 


316 


317 


318 


319 


320 


322 






323 


325 


326 


331 


333 


334 


338 


340 


349 


353 


355 


337 






360 


366 


367 


373 


374 


377 


382 


383 


386 


387 


388 


391 






394 


395 


398 


401 


404 


406 


407 


410 


411 


412 


415 


417 






422 


423 


427 


429 


430 


433 


447 


449 


430 


451 


470 


474 






475 


476 


479 


480 


482 


496 


499 


500 


501 


502 


504 


505 






506 


507 


511 


512 


563 


564 


566 


576 


630 


631 


633 


634 






635 


636 


637 


638 


639 


640 


682 


684 


687 


690 


700 


721 






754 


755 


758 


759 


764 


766 


767 


773 


774 


778 


779 


780 






782 


783 


785 


787 


792 


794 


798 


801 


802 


803 


806 


808 






809 


810 


815 


818 


820 


821 


825 


826 


828 


830 


855 


856 






858 


866 


882 


884 


885 


886 


887 


888 


890 


891 


893 


894 






899 


901 


902 


906 


908 


912 


913 


914 


922 


924 


927 


929 






934 


937 


938 


939 


941 


942 


945 


946 


947 


950 


953 


955 






958 


963 


971 


974 


978 


981 


985 


987 


988 


989 


992 


993 






994 


997 


1001 


1003 


1019 


1024 


1025 


1030 


1041 


1045 


1046 


1050 






1064 


1065 


1072 


1073 


1074 


1077 


1081 


1083 


1105 


1108 


1117 


1123 






1128 


1131 


1141 


1144 


1147 


1148 


1149 


1192 


1200 


1237 






006865 


CHKBUF 


*349 


211 


453 


491 


















007331 


CHKCRC 


*932 


861 






















007336 


CHKCRC1 


♦ 937 


933 






















007346 


CHKCRC2 


♦ 942 


940 






















007352 


CHKCRf!3 


#945 


943 






















007468 


CHKXDLE 


♦ 1001 


865 






















000010 


CHRCOM 


♦ 123 


1110 


1117 




















000001 


CIP 


*105 


470 


475 


1066 


1108 


1117 


1148 












006776 


CIVIOL 


♦ 703 


556 


626 


666 


1190 
















006772 


CMEMRF 


♦ 701 


365 


577 


586 


594 


1195 


1201 


1205 


1223 








006770 


CMENPK 


♦ 700 


350 


356 


361 


909 


915 


960 


966 
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030011 


COMMODE 


♦ 961A 


169 


449 


474 


507 


512 


630 


684 


700 721 755 


758 






792 


803 


813 


815 


974 


981 


1025 


1046 


1072 1077 1147 


1237 


000112 


CPRE 


*6 




















000010 


CRC 


♦ 110 


191 


208 


249 


932 


934 










006774 


CRETURN 


*702 


237 


378 


484 


494 


761 


768 


788 


804 811 814 


659 






920 


928 


928 


975 


982 


1004 


1070 


1078 


1082 1084 1108 


1127 






1129 


1140 


1145 
















000011 


CREV 


*5 




















000002 


CVER 


♦ 4 




















007610 


DECRIC 


♦ 1105 


1119 


















006477 


DECXIC 


♦ 477 


508 


513 
















006500 


DECXIC1 
OIMP 


♦ 478 
562 


469 
668 


















000020 


OLE 
DMAR 


♦ 143 
362 


293 
580 


430 
1202 


866 


964 


1001 










007223 


DORCRC 


♦ 882 


935 


979 


986 


995 


1002 










006047 


DQSXCRG 


*218 


207 


















006212 


DOXCRC 


*314 


298 


396 


418 














000055 


END 


♦ 142 


305 


880 
















000001 


EOB 


♦ 104 


105 


289 


340 


395 


860 


994 








007146 


EOF 


♦ 825 


807 


















000046 


ETB 


♦ 140 


301 


876 
















000003 


ETX 


♦ 139 


299 


874 
















007053 


F80 
FETCH 


♦ 780 

1209 


777 




















FETCHI 


641 


672 


675 


679 


693 














FETCHW 


562 


601 


1229 
















000004 


FILIP 


♦ 108 


291 


380 


382 


391 


429 










000020 


FIP 


♦ 112 


191 


216 


218 


243 


247 


253 


*£ m <3 


790 798 806 


818 


000176 


FLAG 


♦ 148 


245 


260 


825 














004000 


FLEX 


M32IA 




















000205 


GDCRCH 


♦ 154 


826 


















000117 


6DCRCL 


♦ 155 


828 


















000377 


GLOBAL 


♦ 150 


794 


















007103 


60IDLE 


*801 


797 


819 
















007125 


GOTAONE 


♦ 813 


753 


















007664 


G0T8RT 


*J147 


1124 


















007471 


GSR 


*1019 


726 


















007524 


GSRl 


*1042 


1020 


1112 
















007566 


G8R2 


*1072 


1085 


















007554 


GSRTAP 


*1064 


1050 


















007522 


6SRTAP1 


♦ 1041 


1029 


















006446 


GSX 


♦ 447 


174 


















007600 


GSYNtOP 

HL2MRH 

HL2MRL 


♦ 1081 
584 
584 


1089 
1211 

1211 


















000004 


IDLE 
IIMP 
IMAR 


♦ 123 
597 
916 


767 

967 


802 
















006024 


INCBIT 


*202 


192 


















000174 


1*87. 


*151 




















006137 


INTXCRC 


♦ 262 


248 
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020005 
000037 



020004 

010001 
000*01 
000A02 

030000 



010003 



010004 
010005 
010006 

010007 

010010 
010011 



020002 



020003 

010013 
006106 
010012 

010000 
000020 
000010 
000040 
000000 
00200PI 



010002 



TO 

IT 

ITB 

ITW 

IVIOL* 

n 

KBSCNT 

LA 

LOLE 

LINK 

LUCF 

LUF 

MAOR 

MARIH 

MARIL 

MAROH 

MAROL 

MBITS 

MBSTAT 

MCRCM 

MCRCL 

MOR 

MOSKS 

MDSKT 

MOW 

MEMPFH 

MO 

MODIN 

MOOW 

MP 

MSECT 

MT8UF 

MTRAK 



POLNP 

POLVHI 

POLVLO 

PRE 

PROC 

PROD 

P3WI 

PSWO 





157400 RBUF 



*4ifA 
264 
*W1 
195 
703. 

♦ 40IA 
*49IA 

♦118 
*106 

950 

*82»A 

692 

567 

*541A 

585 

585 

352 

353 

*551A 

*56IA 

*57IA 

♦ 58IA 
357 
*59!A 
*60«A 
359 
701 

♦ 38JA 
1195 

681 
351 

♦ 39IA 
1195 v 

♦ 62IA 
*243 

*61 J A 

466, 

*48»A 
*152 
♦ 153 

*3I A 
*130iA 
♦131IA 

351 

600 

*46!A 

329 

775 

904 
1039 
1061 

*33 



559 
364 
303 
1074 
1243 
371 

689 
107 
978 
349 

683 

1212 
918 
569 
564 



366 



574 
1239 

350 
1201 

910 

350 

1201 

213 



227 



555 

1228 

203 

330 

781 

923 

1040 

1062 

911 



667 

373 

878 

1081 

628 

754 

296 

1003 

358 

1196 



969 
587 
588 



589 



581 

356 
1205 

981 

356 

1205 



778 
779 



600 

204 

336 

784 

1023 

1044 

1063 

962 



565 

1083 

670 

801 

311 

368 



1212 
911 
912 



1196 



589 

381 
1223 



361 
1223 



625 

223 
375 
854 
1026 
1047 
1143 
1191 



585 



677 

810 
391 

563 



919 



1206 

821 

401 

578 



970 



1212 



962 
963 



1191 
1192 



1208 

913 
365 

365 



1213 

917 
577 

577 



685 

229 
376 

885 
1027 

1048 
1212 



910 

501 

886 

1028 

1049 



830 

404 

1029 



410 
1033 



417 

11850 



420 
1856 



422 



862 



964 
586 

586 



968 1199 1213 

594 909 915 960 



594 



909 



915 



960 



966 



966 



961 

317 

510 

887 

1031 

1852 



1189 

318 
585 
890 

1834 
1054 



1228 

319 

688 

895 

1035 

1057 



322 

691 

896 

1036 

1058 



327 
752 
897 

1037 
1059 



328 
765 

898 
1838 
1860 
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007202 


RCHKOLE 


♦ 866 


954 






















007205 


RCHKSYN 


♦ 868 


972 






















030006 


RCRCH 


*93tA 
947 


84 
989 


773 


774 


778 


783 


785 


808 


826 


893 


9P6 


939 


030007 


RCRCL 


*94»A 
946 


73 
If Bo 


85 


779 


780 


782 


809 


828 


882 


893 


901 


938 


030005 


RDATA 


*92*A 


764 


766 


794 


820 


825 


853 


855 


866 


882 


913 


927 






938 


953 


958 


971 


1001 


1030 


1043 


1045 


1064 


1074 


1083 




030007 


RDATA2 


*73 


922 


924 


1022 


1024 


1041 


1081 












007425 


RDLE 


♦ 978 


867 






















007421 


ROIESYN 


*974 


959 






















007456 


RENQ 


*997 


881 






















007446 


REQ8 


*992 


875 


877 




















007451 


REOB1 


*993 


879 






















000011 


REV 


*2lA 
























007113 


RFLAG 


♦ 806 


763 






















030006 


RICOUNT 


*84 


638 


1103 


1105 


1149 
















007357 


RLQIE 


♦ 950 


863 






















030004 


RPNTR 


*91IA 


636 


912 


919 


963 


970 














007274 


RPUTOAT 


*909 


948 






















007375 


RPUTOLE 


♦ 960 


976 






















007273 


RPUTR8S 


♦ 908 


623 


832 


999 


H36 
















007272 


RSETROY 


*907 


791 


799 


983 


990 


1075 


1079 


1134 










007435 


RSOB 


♦ 985 


871 


873 


956 


















030003 


RSTAT 


*90IA 


640 


687 


690 


754 


767 


787 


798 


801 


8*2 


806 


810 






818 


821 


830 


856 


858 


929 


934 


942 


945 


950 


955 


978 






985 


987 


992 


993 


994 


997 


1003 


1019 


1065 


1073 


1108 


1117 






1128 


1131 


1141 


1148 


















007431 


RSYN 


♦ 981 


869 


930 




















007317 


RSYNL.OP 


♦ 922 


857 






















007372 


RXLOLE 


♦ 958 


952 
























SB 


478 


567 


590 


683 


1029 


1030 


1050 


1105 


1123 


1149 


1214 




010002 


SCANSV 


*50IA 


























SOUCIW 


750 


772 


852 


1051 


1125 


1132 


1138 














SOLCMO 


678 


























soucot 


236 


374 


483 


493 


632 
















m?m? 


SOLCR 


*750 
























007031 


SDLCR1 


*764 


817 






















006007 


SDLCX 


♦ 191 
























006041 


SOLCX! 


*213 


210 






















006074 


SOXBIT 


♦ 235 


219 


265 




















006075 


SOXBIT1 


♦ 236 


241 


258 




















006133 


SDXOATA 


♦ 257 


269 






















007077 


SETFIP 


♦ 798 


793 


795 




















007730 


Sill 


*1208 
























006722 


SIACUIN 


♦ 674 


670 






















006707 


SICIO 


♦ 646 
























006755 


SICIOX 


♦ 693 


686 






















007677 
007763 


SII 

SIIEXIT 


♦ 1191 

♦ 1228 


1224 
1197 


1215 


1218 


















007674 


SUN 


♦ 1155 
























007761 


SIISRV 


♦ 1226 


1221 
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007734 

006726 
006733 
006727 
006620 
006664 
006653 
006565 
006613 
006555 
006603 

000002 

006660 
006703 



000001 

030007 
006111 



006077 
000902 



006052 
000062 
030016 

000010 
000004 

030001 

030002 

030001 

030002 
000001 



030012 



SIMIN 

SIMOO 
SIMQDTN 

SIMOOOT 

SIMOT 

SIOCB 

SIQEXIT 

SIORPT 

SIOT 

SI OUT 

SIO*B 

SIP 

SISTART 

SISYN 

SL 

SMR 

SNIO 

SOH 

SPCOUNT 

SPX 

SR 



SRVNXT 

SRVREO 

8RVRPT 

STUFF0 

STX 

SWRPT 

SWUSER 

8XCRC1 

SYN 

SYNCODE 

SVNOEU 

SYNWAIT 

SYSCOM 

TEMPI 

TEMP2 

TEMPH 

TEMPL 

TYPE 

UCFLG 

URA 

URB 

URC 

URH 

URI 

URL 

URO 

URPNTR 



♦ 1211 
*677 

*681 

♦ 678 

♦ 584 

♦ 563 

♦ 600 

♦ 564 

♦ 580 

♦ 519 
*574 

♦ 107 
*606 
#640 

336 
354 
796 

♦ 137 
*83 

♦ 245 
204 
691 

1023 
1058 

702 

593 

598 

♦ 239 

♦ 138 
600 
351 

*220 

♦ 136 
*77 
*98 

32. 
*83IA 
567 

♦ 84 I A 

♦ 85 1 A 
*86*A 

♦ 51A 
1217 
581 
631 
590 
585 
581 
585 
585 
*97!A 



1206 
667 
877 

561 
559 
568 
595 
558 

571 
470 

628 
904 
363 

309 

1123 

215 

229 

765 

1031 

1059 

1241 

1220 

1226 

201 

307 

1228 

555 

251 

312 

82 

99 

123 

33 

85tA 
375 
86IA 



12IA 
630 

1214 

1212 

590 

1212 

590 
637 



591 



472 



1026 
564 

872 

1144 

232 

781 

1034 

1060 



870 

625 

433 
431 
974 

640 

72 
588 
317 



1 171 A 

671 

630 

674 
1192 



480 



1027 

1193 



317 

784 

1035 

1061 



953 

665 

631 
981 
856 

314 
755 
320 



1 191 A 
674 

631 

681 
1200 



496 



1028 
1203 



318 

854 

1036 

1062 



910 

925 
1074 
1077 

944 

315 
739 
323 



124 t A 

678 

871 

1208 



1121 



1047 



1141 

1048 



1049 



319 

885 

1037 

1063 



961 

927 

1081 

997 
316 
334 



681 

678 
1212 



322 

886 
1038 
1143 



328 

887 

1039 



330 376 501 

890 896 898 

1040 1044 1054 



510 

923 

1057 



1189 
958 

1019 

326 
883 
685 



1068 

331 
884 

888 



338 
894 
891 



357 
899 
902 



367 

908 



5«5 



1208 

1214 
1214 
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(9306)10 


UXPNTP 


♦ 95 S A 


564 


575 


576 


634 


683 














00000? 


VER 


*i 1 A 
























000340 


WLNGTH 


*100 


449 


474 


1025 


1046 


1072 


1147 












006144 


XABORT 


*267 


244 


246 




















006332 


XBJT 


♦ 374 


SkBo 


372 


384 


399 


425 


431 


434 


448 


452 






157000 


X8UF 


*32 


352 


569 


587 


















006264 


XBUMP 


♦ 343 


313 


389 


402 


413 


424 










- 




006325 


XBUMPt 


*370 


343 






















006367 


XCRC 


♦ 398 


341 






















006340 


XCRC2 


♦ 388 


290 






















030016 


XCRCH 


♦101IA 
383 


77 

388 


221 
412 


222 


226 


231 


233 


250 


256 


262 


325 


338 


030017 


XCRCt 


♦102IA 


83 


227 


228 


230 


283 


314 


325 


333 


387 


398 


411 


006347 


XCRCXTT 


♦ 386 


381 






















030015 


XOATA 


♦ 10)01 A 


193 


202 


205 


220 


235 


239 


245 


250 


257 


260 


293 






IK s*V 


312 


314 


366 


374 


377 


383 


398 


430 


433 


451 


482 






5«0 


502 


505 




















006415 


XOLE 


♦ 415 


294 






















006372 


XENO 


♦ 401 


306 






















006360 


XEOB 


♦ 394 


300 


3*2 




















006363 


XE081 


*395 


304 






















006135 


XEOF 


♦ 260 


254 






















006066 


XFB0 


*228 


225 






















006433 


XFILL 


♦ 427 


370 






















006355 


XFILUX 


♦391 


(S 5f £ 






















030017 


XICOUNT 


*83 


468 


476 


477 


479 


506 


511 


635 










006204 


XNCNTL 


♦311 


408 


421 




















000010 


XPAR 


♦ 109 
993 


110 


125 


296 


297 


401 


406 


415 


427 


864 


951 


955 


030014 


XPNTR 


♦ 99IA 


353 


355 


360 


364 


373 


423 


566 


633 


682 






006125 


X8DLCRC 


♦ 253 


209 






















006403 


XSOH 


♦ 407 


310 


405 




















030013 


XSTAT 


♦ 98IA 


191 


194 


195 


198 


206 


208 


216 


218 


240 


243 


247 






249 


255 


264 


267 


287 


295 


311 


340 


382 


386 


391 


394 






395 


401 


404 


406 


407 


410 


415 


417 


422 


427 


429 


447 






450 


470 


475 


480 


496 


499 


504 


639 










006376 


X8TX 


♦ 404 


308 






















006443 


XSYN 


♦ 433 


392 


428 




















0B6423 


XXOLE 


♦ 420 


416 























